Select Code to Download

sub foo ($$) { print "@_\n"; }
  foo(1,2,3);

  >>> Too many arguments for main::foo at ...

($_='jjjuuusssttt annootthheer
     pppeeerrrlll haaaccckkeer')=~y/a-z//s;print;