#contents *推奨 [#l7df2493] #!/usr/bin/perl -wT use strict; *メモリに優しくファイルの行数を調べる [#w072e109] open (FILE, "file.dat") || die; while (<FILE>) {} $line = $.; close (FILE); *最長マッチと最短マッチ [#v70885e9] 最長マッチ .+~ 最短マッチ .+? *排他処理 [#f3d84407] flockを使いましょう~ open毎にflockよりかは全体をflockするのが吉みたい *ミリ秒を求める [#qbf339f6] Time::HiRes?モジュールを入れる必要がある Time::HiResモジュールを入れる必要がある # tar xvzf Time-HiRes-1.9707.tar.gz # cd Time-HiRes-1.9707 # perl Makefile.PL # make # make test # make install #!/usr/bin/perl use Time::HiRes; $now = Time::HiRes::time; *日付から秒数を求める [#c6f56e15] use Time::Local; $time = timelocal($sec, $min, $hour, $mday, $mon - 1, $year); *モジュールを確認する [#w41c926e] $ find `perl -e 'print "@INC"'` -name '*.pm' -print 決め打ちならば $ find `perl -e 'print "@INC"'` -name 'Local.pm' -print *Image::Magickのインストール [#e5b8b7a6] # yum install ImageMagick-perl