在perl里如何实现写二进制文件？

听峰

如题，
不是用 print "\x11\x22"，因为我要写的东西内容不定，不能直接写在perl脚本中，而是动态产生定一些数字，并且写下去的不是这些数字的字符串形式。

听峰

解决了，
用pack函数
open(FH,">log") || die "open read log file error\n";
$kk="121221";
syswrite(FH,pack("L",$kk),3,0);
close FH;


log的结果

od -x log
0000000 d985 0001
0000003

唉，找了半天终于搞定。原来pack函数这么牛。、