Help for this page

Select Code to Download


  1. or download this
      DB<1> ($blue, $red) = qw / b r/;
    
      DB<2> say  ${$_} for qw /blue red/;
    b
    r
    
  2. or download this
    $ perl -Mstrict -E 'our ($blue, $red) = qw / b r/; say  ${$_} for qw /
    +blue red/;'
    Can't use string ("blue") as a SCALAR ref while "strict refs" in use a
    +t -e line 1.
    
  3. or download this
      DB<3> say ${ "bl" . "ue"};
    b