关于utime的使用解决方法

关于utime的使用大家好,我在看小骆驼的时候,发现修改时间的这段程序不能通过编译:Perl code#!/usr/bin/per

关于utime的使用
大家好,我在看小骆驼的时候,发现修改时间的这段程序不能通过编译:

Perl code
#!/usr/bin/perl -wuse strict;use diagnostics;my $now=time;my $ago=$now ? 24 * 60 * 60;utime $now, $ago, glob "*";


错误是:
BEGIN not safe after errors--compilation aborted at ./TestUtime line 9

请问是什么原因呢?谢谢!

[解决办法]
谁知道你的第九行是哪一行?