$ perl -wMstrict -le '$!=42; -e "/tmp" or die; print "<$!>"'