2023-05-31から1日間の記事一覧
$path = "./data/";opendir(IN1,$path); open(OUT1,">filename.txt"); while ($filename = readdir(IN1)) { print OUT1 $filename,"\n" if -f $path.$filename; } closedir(IN1);close(OUT1); pendir(my $path, "./data/");foreach(my $file = readdir($path…