$ perl -e 'print "hello\n" and print "bye\n" if 1'
hello
bye