fcntl问题

use POSIX;
use Fcntl qw(:mode);

sysopen FH,"file",O_WRONLY|O_CREAT|O_TRUNC;
fcntl FH,F_GETFL,$mode;
print "$mode\n";
close(FH);


Linux系统上运行后得到的都是乱码，BSD上运行后只返回一个换行。不解？

没人回答？