perl -e 'not() || 1'
perl -e 'die unless not()'