in reply to Difference btw. abs_path and $0?

maybe you want to use FindBin?

In Section Seekers of Perl Wisdom