Help for this page

Select Code to Download


  1. or download this
      DB<106> (my ($ar) = () )     || print "bla"
bla
...
  DB<111> (my ($ar) = (undef,undef) )|| print "bla"
 => 2
  2. or download this
      DB<119> scalar ( my ($ar) = () )
 => 0