今年も終わりですね…などと気の早いことを思ってみないとあっという間に2006年を迎えてしまいます(汗

デススクリプトorz #!/usr/bin/perl -w use strict; use warnings; use Fcntl; eval{ print "start\n"; for(my $i=0;$i<100000;$i++){ print "$i\n" if( 0== $i%100 ); mkdir( $i."dir", 755) or die "cannot mkdir! $i"; } print "end\n"; };if($@){ print …