| blib/lib/WWW/Slides/Controller.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 13 | 18 | 72.2 |
| line | true | false | branch |
|---|---|---|---|
| 21 | 3 | 1 | unless defined $name |
| 29 | 6 | 22 | if $$args{'selector'} |
| 152 | 42 | 0 | if (defined(my $newstuff = $self->get_input_chunk)) |
| 161 | 0 | 42 | unless substr($buffer, -1) eq "\n" |
| 178 | 0 | 42 | unless defined $cmd |
| 179 | 40 | 2 | if (exists $commands{$cmd}) { } |
| 181 | 0 | 40 | if ($WWW::Slides::Controller::EVAL_ERROR) |
| 198 | 0 | 76 | unless defined $v |
| 203 | 28 | 14 | defined $$command{'target'} ? : |