$ perl -we'sub my_print ($) { print @_ } my_print 0,1' 0 $ perl -we'sub my_print { print @_ } my_print 0,1' 01