Select Code to Download

#!/usr/bin/perl

...

print foo() . ' ' . foo('baz') . "\n";    # 1 0
print bar() . ' ' . bar('baz') . "\n";    # also 1 0

 #!/usr/bin/perl

 use strict;
...

 print foo() . ' ' . foo('baz') . "\n";    # 1 0
 print bar() . ' ' . bar('baz') . "\n";    # 11 0