| blib/lib/Types/Standard.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 9 | 20 | 45.0 |
| line | true | false | branch |
|---|---|---|---|
| 9 | 0 | 281 | if ($] < "5.01") |
| 48 | 0 | 0 | if ref $_[0] |
| 0 | 0 | unless $_[0] | |
| 0 | 0 | if ref do { my $tmpstr = $_[0]; \$tmpstr } ne "SCALAR" | |
| 59 | 281 | 0 | eval { do { require Ref::Util::XS; 'Ref::Util::XS'->VERSION(0.1); 1 } } ? : |
| 181 | 0 | 194 | unless eval "require $class; 1" |
| 185 | 3140 | 746 | unless ref $type->{$key} eq "Types::Standard::LazyLoad" |
| 191 | 0 | 126 | unless ref $mm->{$key} eq "Types::Standard::LazyLoad" |
| 211 | 0 | 281 | $ENV{'PERL_TYPES_STANDARD_STRICTNUM'} ? : |
| 791 | 94 | 1 | wantarray ? : |