perl
-[detarame.pl]----------------- $length=$ARGV[0]; srand(time) for (1..$length) { $r=rand(255); print chr($r); } -------------------------------使い方: detarame.pl 文字数 > 出力先ファイル 例: perl detarame.pl 2048 > ./outfile *07/12/17修正
-[detarame.pl]----------------- $length=$ARGV[0]; srand(time) for (1..$length) { $r=rand(255); print chr($r); } -------------------------------使い方: detarame.pl 文字数 > 出力先ファイル 例: perl detarame.pl 2048 > ./outfile *07/12/17修正