Help for this page

Select Code to Download


  1. or download this
    >perl -wle"my @x = @$ref; print $ref"
Use of uninitialized value in array dereference at -e line 1.
Use of uninitialized value in print at -e line 1.
  2. or download this
    >perl -wle"@$ref = my @x; print $ref"
ARRAY(0x225228)
  3. or download this
    >perl -wle"sub {}->(@$ref); print $ref"
ARRAY(0x225230)

>perl -wle"for (@$ref) {} print $ref"
ARRAY(0x225228)