2004-06 / 2004-06-21

前のエントリ: knoppix on Dynabook SS 3380 [knoppix]
次のエントリ: ファイルテスト演算子 -M -A -C [perl]

unix find 相当モジュール File::Find
2004-06-21-2 / カテゴリ: [programming][perl] / [permlink]

SYNOPSIS: find サブルーチンのリファレンス, ディレクトリ

(例1) 実行ファイル(-x)をprint
use File::Find;
find(\&wanted, $dir);
sub wanted {
  print "$File::Find::name\n" if -x $_;
}

(例2) 配列に入れる
use File::Find;
find(sub { push @files, $File::Find::name if -f }, $dir);
前のエントリ: knoppix on Dynabook SS 3380 [knoppix]
次のエントリ: ファイルテスト演算子 -M -A -C [perl]

2013 : 01 02 03 04 05 06 07 08 09 10 11 12
2012 : 01 02 03 04 05 06 07 08 09 10 11 12
2011 : 01 02 03 04 05 06 07 08 09 10 11 12
2010 : 01 02 03 04 05 06 07 08 09 10 11 12
2009 : 01 02 03 04 05 06 07 08 09 10 11 12
2008 : 01 02 03 04 05 06 07 08 09 10 11 12
2007 : 01 02 03 04 05 06 07 08 09 10 11 12
2006 : 01 02 03 04 05 06 07 08 09 10 11 12
2005 : 01 02 03 04 05 06 07 08 09 10 11 12
2004 : 01 02 03 04 05 06 07 08 09 10 11 12

最終更新時間: 2013-05-02 16:12