What does the following code print and _why_? ----------------------Cut------------------------------- print "aha\n" and exit if (my $foo = 1 and $foo == 1); print "doh\n"; ----------------------Cut-------------------------------