我试着使用binmode，如perldoc所说。
open(my $out,'>:raw','sample.bin') or die "Unable to open: $!"; print $out pack('s<',255) ; close($out);
在上面的例子中，’s’告诉它输出一个短(16位)，’&’强制它到小端模式。
此外，在调用open中的’：raw’指示它将文件句柄放入二进制模式在平台上(这相当于使用binmode)。 PerlIO手册页有更多的信息，以不同的格式做I / O。
