cl.pocari.org

Perlクックブック - Perlの鉄人が贈るレシピ集

  トムクリスチャンセン (著), ネイザントーキントン (著), 田和勝 (翻訳)
  オライリー・ジャパン
  ISBN: 4873110378
  2001/03/23
  6,090 円

- 目次 (日本語)
  http://www.oreilly.co.jp/BOOK/pcook/contents.htm

- サンプルのダウンロード
  http://examples.oreilly.com/cookbook/

タグ: [Books][Perl]

Perl で日付の処理

comments(0) | trackback(0)

- 楽チン

print scalar(localtime);

Thu May 15 10:22:54 2003

- 自由度高し

use POSIX qw(strftime);
print strftime "%Y-%m-%d %T\n", localtime;

2003-05-15 10:22:54

タグ: [Perl][Code]

Perl でどこで呼び出されたかを返す caller

comments(0) | trackback(0)

open FILE, 'hoge' or error("can't open file\n");

sub error {
    print @_[0];
    my @call = caller;
    print "Package name: $call[0]\n";
    print "File name:    $call[1]\n";
    print "Line no:      $call[2]\n";
}

- エラー時の出力

can't open file
Package name: main
File name: ./test.pl
Line no: 5

タグ: [Perl][Code]

Perl で Excel ファイルに出力するモジュールの日本語訳

comments(0) | trackback(0)

- (ちょっと古いけど) PHP 版でも参考になる．
- Spreadsheet::WriteExcel version 0.33
http://member.nifty.ne.jp/hippo2000/perltips/Spreadsheet/WriteExcel.htm

タグ: [Perl]

Perl の排他制御 (flock,open,symlink,mkdir,rename)

comments(0) | trackback(0)

http://homepage1.nifty.com/glass/tom_neko/web/web_04.html

タグ: [Perl]

Perl による IMAP 認証

comments(0) | trackback(0)

use Mail::IMAPClient;

$imap = Mail::IMAPClient->new(
    Server   => $server,
    User     => $user,
    Password => $password
) || die("Can not login.");