Help for this page

Select Code to Download

Select or download this

sub new
{
...
    $self->$_($params{$_}) foreach keys %params;
    return $self;
}