in reply to Finding the path of the current library/file

use File::Spec;
print File::Spec->rel2abs(__FILE__);

[download]

In Section Seekers of Perl Wisdom