| line |
true |
false |
branch |
|
39
|
2 |
95 |
if /
|
|
50
|
0 |
12 |
if (m[]imsx) |
|
55
|
6 |
6 |
if (/]*\sid="([^"]*)"/imsx) { } |
|
|
0 |
6 |
elsif (/
|
|
62
|
6 |
6 |
if (m[]imsx) |
|
63
|
6 |
0 |
if (--$div_depth == $div_mark) |
|
83
|
5 |
117 |
if wantarray |
|
93
|
0 |
5 |
unless defined $what |
|
96
|
3 |
2 |
if (ref $what eq 'SCALAR') { } |
|
|
1 |
1 |
elsif (ref $what eq 'GLOB') { } |
|
|
0 |
1 |
elsif (ref $what eq 'ARRAY') { } |
|
98
|
0 |
3 |
unless open $fh, '<', $what |
|
100
|
0 |
3 |
if ($WWW::Slides::SlideShow::EVAL_ERROR) |
|
110
|
0 |
3 |
if ($WWW::Slides::SlideShow::EVAL_ERROR) |
|
117
|
0 |
0 |
if wantarray |
|
135
|
0 |
1 |
unless open $fh, '<', $what |
|
141
|
4 |
1 |
if $was_mine |
|
179
|
0 |
0 |
unless my $parser = 'HTML::Parser'->new('api_version', 3) |
|
184
|
0 |
0 |
unless lc $tag eq 'body' |
|
190
|
0 |
0 |
if (lc $tagname eq 'body') { } |
|
194
|
0 |
0 |
if defined $newtext |
|
202
|
0 |
0 |
unless $parser->parse_file($filename) |
|
254
|
4 |
2 |
if $self->validate_slide_id($id + 1) |
|
261
|
2 |
1 |
if $self->validate_slide_id($id - 1) |
|
268
|
0 |
9 |
unless $id =~ /\A\d+\z/ |