| lib/Devel/Trepan/Pod2Text.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 6 | 20 | 30.0 |
| line | true | false | branch |
|---|---|---|---|
| 22 | 13 | 0 | eval { do { require Term::ANSIColor; require Pod::Text::Color } } ? : |
| 27 | 13 | 0 | eval { do { require Pod::Text } } ? : |
| 36 | 1 | 1 | unless $width |
| 37 | 2 | 0 | unless $color |
| 41 | 0 | 2 | if ($color and $Devel::Trepan::Pod2Text::HAVE_TEXT_COLOR) { } |
| 59 | 0 | 0 | unless $width |
| 60 | 0 | 0 | unless $color |
| 64 | 0 | 0 | if ($color and $Devel::Trepan::Pod2Text::HAVE_TEXT_COLOR) { } |
| 75 | 0 | 0 | unless "=pod\n" eq substr($input_string, 0, 4) |
| 77 | 0 | 0 | unless "\n=cut\n" eq substr($input_string, -6) |