めもめも。 ファイルの内容を変数に格納する if(! open(in,"D:/web/t.csv")){ print "file open\n"; } $in = join('',<in>); close(in); print $in; CSVの1列目をソート 昇順(A-Z) @csv = sort { (split(/,/,$a))[0] cmp (split(/,/,$b))[0] } @csv; @csv = reve</in>…

Perlでファイルの排他制御を行うにあたり、実運用に耐えるコーディングについて考えます。 今回はrenameを用いた排他制御を考えます。

Perlでファイルの排他制御を行うにあたり、実運用に耐えるコーディングについて考えます。 今回はflockを用いた排他制御です。