Perl日記

日々の知ったことのメモなどです。Perlは最近やってないです。

2010-11-04から1日間の記事一覧

配列の要素数とフィルタ後の要素数を比較

配列の中に、ファイルパスが入っていて、それらのファイルが全て既に存在するときだけその場で処理を返す。 my @files = ('./aaa.txt', '/tmp/bbb.txt', '~/ccc.txt'); if (@files == grep -f, @files) { return; } 割とスマート。