Help for this page

Select Code to Download


  1. or download this
    package Person;
use Moo;
...
has age  => (is => 'rw', isa => Int );
 
1;
  2. or download this
    perl -I. 1223262.pl
Foo
...
    "Num" is a subtype of "LaxNum"
    Value "young" did not pass type constraint "LaxNum" (in $self->{"a
+ge"})
    "LaxNum" is defined as: (defined($_) && !ref($_) && Scalar::Util::
+looks_like_number($_))