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

Re: Answer: How do I get the directory containing a given file?

by mobiGeek (Beadle)
on Feb 24, 2002 at 19:19 UTC ( [id://147195]=note: print w/replies, xml ) Need Help??


in reply to Re: How do I get the directory containing a given file?
in thread How do I get the directory containing a given file?

use Cwd qw(abs_path); use File::Basename; my $dir = dirname(abs_path("../foo.html"));<BR> print "dir is ($dir)\n";

yields:

  opendir(../foo.html/..): Not a directory at text.pl line 4
  dir is ()

Other ideas?

Replies are listed 'Best First'.
Re: Re: Answer: How do I get the directory containing a given file?
by wog (Curate) on Feb 24, 2002 at 20:02 UTC
    It appears that Cwd::abs_path has issues in 5.6.1 (which seem to be fixed in bleedperl). You can get around this by reversing the calls:

    use Cwd qw(abs_path); use File::Basename; my $dir = abs_path(dirname($file));

Log In?
Username:
Password:

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

How do I use this?Last hourOther CB clients
Other Users?
Others scrutinizing the Monastery: (5)
As of 2024-05-20 00:11 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found