Help for this page

Select Code to Download


  1. or download this
    $ perl -Ilib -MType::Tiny -E'say for sort keys %INC'
Eval/TypeTiny.pm
...
strict.pm
warnings.pm
warnings/register.pm
  2. or download this
    use strict;
use warnings FATAL => qw(all);
...
  $self->{age} = $age;
  return $self;
}
  3. or download this
    use feature "state";
use strict;
...
  $self->{age} = $age;
  return $self;
}