如何获取脚本运行的路径?

如何获取脚本运行的路径?

请问如何获取脚本运行的路径?不是指当前路径。

比如use Foo;

在Foo.pm中想知道自己所在的路径。

谢谢指教!
这应该不是原始需求吧。

print %INC;
可以试试这个,呵呵,我通常都是这么裹我自己的lib的。

use Cwd qw/abs_path/;
use File::Basename;
use lib abs_path(dirname(__FILE__)) . '/lib';

__PACKAGE__貌似也能用一下。
谢谢楼上!
__FILE__是我想要的:)