perl -le "END{print 'uhoh, bye'} die 'Feh'"