perl -le 'print $^X' perl