Select Code to Download

#!/usr/bin/perl -w

...

print foo().' '.foo('baz')."\n"; # that was expected
print bar().' '.bar('baz')."\n"; # undef

##################################################
Expected output:
...
0

##################################################