#!/usr/bin/perl if (not $ENV{PORTABLE_XL_PERL}) { require FindBin; local $ENV{PORTABLE_XL_PERL} = 1; local $ENV{PERL5LIB} = ''; local $ENV{PERLLIB} = ''; exec("$FindBin::Bin/perl", $0, @ARGV); } print $^X;