perl - Perl 中的 $@ 是什么？

Question

我有一个我无法理解的 Perl 脚本。

for $i(@myarr)
{
    #some stuff
    eval {
        #some stuff
    };
    if($@)
    {
        print "*** $@ ****";
    }
}

那个 eval 是做什么的？它是标准的 Perl 命令还是只是一些子命令？

变量 $@ 是什么？它目前正在打印一个字符串，但我不知道该字符串来自哪里。

Answer 1

$@来自最后一个 eval、do-FILE 或 require 命令的 Perl 语法错误或例程错误消息。如果设置，则编译失败，或者 die 函数在 eval 的代码中执行。请阅读此文档 http://perldoc.perl.org/perlvar.html