On 10.03.2009, at 21:25, John Delacour wrote:

At 21:10 -0600 9/3/09, Doug McNutt wrote:

At 22:24 -0400 3/9/09, Chris Devers wrote:
How can a Perl script reliably, portably resolve the path inside which
it is running?...

$0 That's a zero. Has always worked for me to produce a full path to a running perl script.

...There is a module "cwd"...

or rather Cwd. $0 will give the name but not the full path, so I'd suggest
the following:

use Cwd;
my $currentdir = cwd();
print "$currentdir/$0\n";

That's for a relative path. It would fail if $0 is an absolute path to begin with, the cases would have to be distinguished. To be truly portable, it should also make no assumptions about the directory separator. That's what Dir::Self (available on
CPAN) does.


Reply via email to