08/09/08 05:58:40
use feature qw( :5.10 );
system q|cls|;
open FH,">","4.txt";
for (1..12000000) {
state $a="a";
print FH $a," ";
$a++;
}
#--------------------------
↑これで１千２百万回まわしたら、
７０MBのテキストファイルになって、
エディタで開いたら表示がぶっ壊れた
URLﾘﾝｸ(kazato.run.buttobi.net)