Re: Full path to the current file?

[cLive ;-)]

in reply to Full path to the current file?

I have a feeling the proposed solutions above don't give you the path relative to the module, but to the script. Cwd is the simplest solution though:

#!/usr/bin/perl
use strict;
use warnings;
use Cwd qw(abs_path getcwd);

print "This script is: ".abs_path($0)."\n";
print "Working dir is: ".getcwd()."\n";

but that won't tell you the path from the actual module.

For that, you'll need to hard code the path to the module (I think):

my $abs_filepath = abs_path("$module_dir/$relative_pilepath");

__FILENAME__ is your friend...