Simple Sand Samples |
Perl > バイナリデータをファイルへ書き込む
write-bin.pl
binmode FH; open FH,'>',$ARGV[0]; print FH chr 1; print FH chr 2; print FH chr 3; close FH;
$ perl write-bin.pl hoge.bin
$ od -tx1 hoge.bin
0000000 01 02 03
0000003
$
$ od -tx1 hoge.bin
0000000 01 02 03
0000003
$
* 確認環境 Debian Linux(Wheezy)