Help for this page

Select Code to Download


  1. or download this
    my @refs;
for (1..10) {
   push @refs, \my $foo;
}
print "$_\n" for @refs;
  2. or download this
    SCALAR(0x18317d8)
SCALAR(0x23605c)
...
SCALAR(0x1831880)
SCALAR(0x1831898)
SCALAR(0x18318b0)