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