为什么第一个程序输出时1啊？ 还有第二个stat程序的输出太复杂冗长了，有什么办法详细分类输出一下？

Question

程序如下：
my $filename = "haha.txt";
$value = stat $filename;
print "$value\n"
执行程序：
root@luis-VirtualBox:~# ./perl.pl
1
另一个程序：
my $filename = "haha.txt";
print stat $filename ;
执行如下：
root@luis-VirtualBox:~# ./perl.pl
2049806726331881000513333529451333000187133300018740968root

Answer 1

第一个是标量环境，所以打印返回值。第二个是列表环境，打印的是各个参数的列表。你可以定义多个列表变量来得到相应的值，比如($a, $b, $c) = stat $filename

Answer 2

($dev,$ino,$mode,$nlink,$uid,$gid,$rdev,$size,$atime,$mtime,$ctime,$blksize,$blocks)= stat($filename);你需要定义一个数量来接收它的返回值，然后单独使用其中的某一个或几个值

Answer 3

赋值到数组：@a=stat($f);print join '|',@a;试试吧。