perl -e '$empty = (); print ("hi there\n") if \!defined($empty);'
__END__
hi there