| lib/LiBot/Handler/PerldocJP.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 0 | 14 | 0.0 |
| line | true | false | branch |
|---|---|---|---|
| 33 | 0 | 0 | if ($pid) { } |
| 54 | 0 | 0 | if ($arg =~ /\A[\$\@\%]/) { } |
| 0 | 0 | elsif ($arg =~ /\A-[a-z]\s+(.+)/) { } | |
| 79 | 0 | 0 | unless open STDERR, '>&', $wh |
| 81 | 0 | 0 | unless open STDOUT, '>&', $wh |
| 87 | 0 | 0 | if (@ARGV == 1 and $ARGV[0] =~ /^[\$\@\%]/) |
| 94 | 0 | 0 | if $@ |