blib/lib/Net/Finger/Server.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 6 | 10 | 60.0 |
line | true | false | branch |
---|---|---|---|
21 | 0 | 0 | if (my $isa = delete $config{'isa'}) |
22 | 0 | 0 | unless eval "require $isa; 1" |
165 | 1 | 3 | if ($query eq '') { } |
1 | 2 | elsif ($query =~ /\A$u_regex\z/) { } | |
1 | 1 | elsif ($query =~ /\A($u_regex)?((?:\@$h_regex)+)\z/) { } |