perl -e '$/=undef; eval(<>)' snull.pl