解释一下
sub readfile {
my $subname=qw(readfile);
.............................
}
想问下，为什么要使用这种用法，readfile是一个子程序，但是在使用这个子程序的时候为什么还要再设一个变量，而变量内容就是这个子程序的名，因为发现后面的程序中根本没有用到这个变量（除了在die中），这有什么说法吗？多谢！
my $subname=qw(readfile);
.............................
}
想问下，为什么要使用这种用法，readfile是一个子程序，但是在使用这个子程序的时候为什么还要再设一个变量，而变量内容就是这个子程序的名，因为发现后面的程序中根本没有用到这个变量（除了在die中），这有什么说法吗？多谢！
作者: 超级细菌 发布时间: 2011-06-09
Perl 缺少一个获取当前函数名的关键字 __SUB__ 之类的东西。没什么别的说法，仅仅是保存当前函数名
作者: zhlong8 发布时间: 2011-06-09
用了这个会显得程序很规范吗？还是根本就没有用的必要？
作者: 超级细菌 发布时间: 2011-06-09
哦，这个我明白了，这个还是有用处的，在子程序多的时候，如果出错可以利用这种方式然后知道哪个子程序出错了
作者: 超级细菌 发布时间: 2011-06-09