Select Code to Download

  DB<1> sub tst ($) { print @_}   # primitive approach
 
...
  DB<6> tst2 "1"                  # NO! Constants are not allowed ... 
+sigh
Type of arg 1 to main::tst2 must be scalar (not constant item) at (eva
+l 9)[/usr/share/perl/5.10/perl5db.pl:638] line 2, at EOF

  DB<9> print ref \"1"
SCALAR

  DB<13> @a=qw/a b c/
 
...
 
  DB<17> print join scalar @a,":" # well, in <0.1% of the usecases, yo
+u can afford to be explicit
: