| inc/My/Module/Test/App.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % | 
| condition | 9 | 24 | 37.5 | 
| line | !l | l&&!r | l&&r | condition | 
|---|---|---|---|---|
| 320 | 4 | 8 | 0 | eval "require $module; 1" and eval { do { $module->VERSION($v) if $v; my(@import) = map({split(qr/ \s* , \s* /msx, $_, 0);} @{[] unless $opt{'import'};}); eval "package $caller; $module->import( qw{ @import } ); 1" unless $opt{'noimport'} } } | 
| 331 | 7 | 0 | 5 | $skip and $skip =~ / \A all \z /imsx | 
| 352 | 0 | 5 | 2 | defined $_ and not ref $_ | 
| line | l | !l | condition | |
|---|---|---|---|---|
| 259 | 0 | 0 | 0 | $time_tested || 0 | 
| line | l | !l&&r | !l&&!r | condition | 
|---|---|---|---|---|
| 140 | 0 | 0 | 0 | $tz_utc ||= "DateTime::TimeZone"->new("name", "UTC") | 
| 150 | 0 | 0 | 0 | $tz_local ||= "DateTime::TimeZone"->new("name", "local") | 
| 311 | 0 | 0 | 0 | $go ||= "Getopt::Long::Parser"->new | 
| 408 | 232 | 4 | 496 | $want eq $got or $no_stat{$^O} |