| |
秀丸Ver.8.10
.lnkファイルを開いてみたら秀丸が無限ループに突入しました。
#perl - 秀丸にてプログラムの実行から起動
$in_file = 'a.lnk';
$out_file = 'log.file';
open IN, "<", $in_file;
open OUT, ">", $out_file;
binmode(IN);
binmode(OUT);
while(<IN>){
print OUT $_;
print STDOUT $_;
}
ところで、要望なのですが、
実行する文字コードと受け取る文字コードを個別に設定させてもらえないでしょうか。
例えば、記述はUTF8、受け取りはcp932とか、バイナリがいいとか、
パイプやソケットの都合上、一部はEUCとか、
そうゆうケースはよくあります。
|
|