Help for this page

Select Code to Download


  1. or download this
       DB<114> $l = ( @a = qw/a b/ )
     => 2
    
  2. or download this
      DB<121> print "$_\n" for ($a=666) x= 2
    666
    ...
    
      DB<122> $a
     => 666