$ perl -le'print $^X'
/usr/bin/perl
$ cp /usr/bin/perl ~/tmp/
$ ./tmp/perl -le'print $^X'
/home/rafl/tmp/perl