Beefy Boxes and Bandwidth Generously Provided by pair Networks
Perl-Sensitive Sunglasses
 
PerlMonks  

Re: Full path to the current file?

by cLive ;-) (Parson)
on Jan 08, 2008 at 16:11 UTC ( #661119=note: print w/ replies, xml ) Need Help??


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...


Comment on Re: Full path to the current file?
Select or Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://661119]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others chilling in the Monastery: (7)
As of 2014-07-23 00:12 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My favorite superfluous repetitious redundant duplicative phrase is:









    Results (130 votes), past polls