| blib/lib/Acme/RunDoc.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % | 
| branch | 6 | 22 | 27.2 | 
| line | true | false | branch | 
|---|---|---|---|
| 26 | 0 | 2 | unless (my $text = 'Text::Extract::Word'->new($file)->get_body(undef)) | 
| 33 | 0 | 1 | unless my $fh = 'IO::File'->new($file, 'r') | 
| 35 | 0 | 1 | unless $class->do($fh) | 
| 47 | 0 | 1 | unless defined $file | 
| 60 | 0 | 1 | if $import | 
| 72 | 0 | 0 | ref $args[0] ? : | 
| 73 | 0 | 0 | ref $args ? : | 
| 0 | 0 | ref $args eq 'HASH' ? : | |
| 83 | 0 | 0 | unless eval "$eval; 1" | 
| 90 | 8 | 0 | if $args[0] eq 'Acme::RunDoc' | 
| 91 | 0 | 0 | if UNIVERSAL::can($args[0], 'isa') and $args[0]->isa('Acme::RunDoc') |