use Types::Standard qw(Int); tie my @list, Int; push @list, 1; push @list, 2; push @list, 3.14; # dies [download]
In reply to Re^2: Perl OOP by tobyink in thread Perl OOP by QueenSvetlana