Help for this page
my $a = []; my $b = [ $a ]; push @$a, $b; # Now $b contains a reference to $a and # $a contains a reference to $b.
sub marry { ... $wife->set_spouse($husband); $wife->parent[0]->pay_for_party; }
www.com | www.net | www.org
No recent polls found