| line |
true |
false |
branch |
|
79
|
4 |
5 |
ref $args eq 'ARRAY' ? : |
|
94
|
4 |
12 |
ref $_ eq 'ARRAY' ? : |
|
106
|
4 |
13 |
if (@_) |
|
107
|
6 |
1 |
if defined $_ |
|
113
|
10 |
7 |
exists $$self{'search'} ? : |
|
114
|
9 |
8 |
wantarray ? : |
|
126
|
6 |
37 |
if @_ |
|
139
|
5 |
19 |
if @_ |
|
152
|
6 |
10 |
if @_ |
|
168
|
3 |
2 |
if $fpath and -f $fpath |
|
196
|
1 |
5 |
length $2 ? : |
|
218
|
16 |
33 |
if (/\G<%(.)(.*?)(?([ \t\r\f]*\n)?/cgsu) |
|
219
|
1 |
15 |
unless exists $OPS{$1} |
|
222
|
1 |
14 |
if $1 eq "\n" |
|
225
|
1 |
14 |
if length $3 |
|
231
|
9 |
24 |
if (/\G(.+?)(?
|
|
233
|
1 |
1 |
$1 eq '|' ? : |
|
234
|
1 |
8 |
$INTERPOLATE ? : |
|
240
|
2 |
1 |
$1 eq '|' ? : |
|
241
|
18 |
6 |
if (length $str) |
|
242
|
1 |
17 |
$INTERPOLATE ? : |
|
312
|
1 |
17 |
if $ref eq 'CODE' |
|
314
|
17 |
0 |
if ($ref eq 'SCALAR') |
|
320
|
2 |
15 |
if $@ |
|
323
|
14 |
1 |
if $self->cache |
|
331
|
0 |
0 |
if $charset |
|
340
|
0 |
0 |
if $@ |
|
342
|
0 |
0 |
if $self->cache |
|
356
|
1 |
18 |
unless $self->cache |
|
358
|
5 |
14 |
ref $path eq 'CODE' ? : |
|
374
|
1 |
3 |
if @_ |
|
390
|
15 |
1 |
$charset ? : |
|
403
|
14 |
1 |
$charset ? : |
|
415
|
1 |
12 |
unless @_ |
|
419
|
8 |
4 |
if 1 == @_ |
|
424
|
1 |
3 |
if ($type eq 'CODE') { } |
|
|
1 |
2 |
elsif ($type eq 'ARRAY') { } |
|
442
|
4 |
4 |
unless my $layout = shift() || $self->layout |
|
450
|
1 |
4 |
if $@ |
|
466
|
5 |
1 |
if defined wantarray |
|
479
|
1 |
3 |
ref $_ && eval {
do {
$_->can('as_uri')
}
} ? : |
|
483
|
1 |
2 |
wantarray ? : |
|
502
|
1 |
4 |
ref $_ && eval {
do {
$_->can('as_html')
}
} ? : |
|
506
|
2 |
2 |
wantarray ? : |