in reply to Re: working with relative paths
in thread working with relative paths

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.

In Section Seekers of Perl Wisdom