05/01/15 19:29:07
>>555
久しぶりに改造工房にお客が来たのに放置されているなぁ～
sub search1の@filelistだが、お前はこの配列に検索に引っかかったものが入っていると思っているだろ？
残念。
@filelistには対象ディレクトリの中にある全てのファイルが格納されている。
試しに
closedir(DIR);
のあとに
errexit("@filelist");
って入れてごらんよ。
漏れならsub search1とsub search2を大改造しる。
opendir(DIR, $dir);
で、指定してた拡張子のファイルのみを
@filelistに入れていく。