Re: working with relative paths

Does this help?

use vars qw($Bin $Script);
BEGIN { ($Bin, $Script) = split /([^\/\\]+)$/, $0 }
chdir $Bin . $ARGV[0];
[download]

Comment on Re: working with relative paths Download Code

Replies are listed 'Best First'.
Re^2: working with relative paths by apotheon (Deacon) on Oct 30, 2004 at 20:28 UTC
Changing the way I used `opendir()` helped, actually. See above discussion for details. - apotheon CopyWrite Chad Perrin	[reply] [d/l]
Re^2: working with relative paths by chanio (Priest) on Oct 31, 2004 at 03:55 UTC
`use vars qw($Bin); BEGIN { $Bin = qx(pwd) } chdir $Bin . $ARGV[0];` [download] .{\('v')/} _`(___)' __________________________ Wherever I lay my KNOPPIX disk, a new FREE LINUX nation could be established.	[reply] [d/l]