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

  >>> Too many arguments for main::foo at ...
[download]

But my concern is about what to do if I'm writing a module, not if I'm using a module. Perhaps the real answer is, write good and unambiguous documentation?
--

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