Help for this page

Select Code to Download


  1. or download this
    use strict;

...
}

print "After For\n";
  2. or download this
    paul@paul-laptop:~$ perl foo
SubRef ok 135976352
...
END
DESTROY CircularRef
DESTROY CircularRef
  3. or download this
           my $self = $copy = bless(sub :lvalue { $copy->ok; my $n }, $cla
+ss);