2004-10-27から1日間の記事一覧
65.4。半纏装備。
Perlのお話です。 use strict; my $DIRNUM = 1000; # フォルダの数 my $name = ; # 標準入力から読み取る chomp($name); # 改行を取り除く my $dir = $name; # フォルダ名にセット mkdir($dir,0755); chdir($dir); # 中に入って for(my $i = 1; $i ではおっ…
65.4。半纏装備。
Perlのお話です。 use strict; my $DIRNUM = 1000; # フォルダの数 my $name = ; # 標準入力から読み取る chomp($name); # 改行を取り除く my $dir = $name; # フォルダ名にセット mkdir($dir,0755); chdir($dir); # 中に入って for(my $i = 1; $i ではおっ…