Help for this page

Select Code to Download

Select or download this

sub new {
    my $proto = shift;
...
    ...
    return bless $self, $class;
}