关于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

请问是什么原因呢？谢谢！

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