perl獲取模塊內部模塊的路徑？

Question

我有一個Perl模塊/x/y/z/test.pm。在這個模塊裏面，我想讀一個配置文件/x/y/z/test.config。然而，我包含了我的模塊/a/b/c/mymain.pl。我怎樣才能讓/x/y/z/在/x/y/z/test.pm中建立/x/y/z/test.config的路徑？

感謝，

Answer 1

AFAIK FindBin將顯示mymain.pl（和它可能在其他模塊中被使用，那麼第一次調用會贏）。嘗試__FILE__：

my $path = __FILE__; 
$path =~ s/pm$/config/;