#!perl use warnings; use strict; unless(1){ print "Hello\n"; } else{ print "WHAT?!!!\n"; }