Help for this page
my %defaults = ( cat => 1, dog => 2 ); ... my $self = \%hash; return bless ($self, $class); }
sub mysub { my $cat = shift || 1; # etc }
www.com | www.net | www.org
No recent polls found