Help for this page

Select Code to Download

Select or download this

sub new {
  my $class = shift;
...
  my $class = shift;
  die "subclass responsibility";
}