为何会不能写入数字10

梦恋情人

[code]



。。。。。。

$FILE = IO::File->;new("+<$FilePath/conut.pl";$|=1;$/="";

print $FILE pack("V",$conut).'';




$conut 是十进制数字。写入文件时使用了pack V ，然而奇怪的是 当数字到了 10 时 ，它写入的不是  0A ,   而是 0D 0A  俩个字符？？

怎么解决？？？








[/code]

梦恋情人

我好像想到一点了。。。。

apile

1. 
   
2. #!/usr/bin/perl
   
3. open(FF,">;aaa.txt");
   
4. print FF pack("V",10);
   
5. close(FF);
   

复制代码

apile$ od -h aaa.txt
0000000  0a00 0000
0000004
apile$ od -c aaa.txt
0000000   \n  \0  \0  \0
0000004
apile$ od -b aaa.txt
0000000  012 000 000 000
0000004

沒看到你所說的 0d0a ????

梦恋情人

我的系统是 win2000, 文本有区别.  我打开binmode 就能正确写入10了.