> perl  -e 'print "$^X\n"'
perl
> /usr/local/bin/perl -e 'print "$^X\n"'
/usr/local/bin/perl
> ../../../usr/local/bin/perl -e 'print "$^X\n"'
../../../usr/local/bin/perl