use Cwd qw(abs_path);
my $path = abs_path($0);

##</code><code>##

.../other/dir/ $ ../../some/script.plx