例如，我有一个名为XXX.pl的perl脚本。此文件包含：
$name = #some function that obtains the script's own name print $name;
输出：
XXX.pl
我想把这个与获取scripts目录的CWD函数相比较。我需要一个函数来获取脚本的名称。谢谢！
print $0;
man perlvar为其他特殊变量。
