line |
true |
false |
branch |
82
|
0 |
5 |
if exists $args{'prefix'} |
148
|
6 |
6 |
if @_ |
154
|
0 |
168 |
unless $self->can($method) |
157
|
0 |
977 |
if (ref $chunk eq 'ARRAY') { } |
161
|
545 |
432 |
if (ref $chunk) { } |
176
|
28 |
21 |
ref $chunk ? : |
|
0 |
49 |
ref $chunk eq 'ARRAY' ? : |
223
|
27 |
280 |
$i++ % 2 ? : |
265
|
5 |
0 |
$self->_isa_function($method) ? : |
272
|
5 |
0 |
if defined {map({$_, 1;} $self->user_functions)}->{$function} |
289
|
20 |
0 |
if length $text |
303
|
0 |
2 |
if ($datum =~ s/^<<(\S+)$//) |
308
|
0 |
0 |
if ($line eq "$marker\n") |
314
|
0 |
0 |
if (length $marker) |
333
|
1 |
0 |
if @$_ > $cols |
340
|
0 |
2 |
if ($i == $#{$row;} and $cols - $i > 1) |
344
|
0 |
2 |
if $cell =~ /\n/ |
346
|
0 |
2 |
unless length $cell |
444
|
1 |
1 |
if ($text =~ /^http.*\.(?i:jpg|gif|jpeg|png)$/) { } |
490
|
0 |
1 |
$text =~ s/\.$// ? : |
511
|
1 |
1 |
if $text =~ s/(.*?) +// |
533
|
1 |
0 |
if ($text =~ /(.*)((?:https?|ftp|irc):.*)/) |
641
|
2 |
13 |
if ($switch++ % 2) |
647
|
1 |
3 |
$1 =~ /0/ ? : |
648
|
2 |
2 |
if ($new_level > $level) { } |
|
0 |
2 |
elsif ($new_level < $level) { } |
692
|
16 |
5 |
unless ($switch++ % 2) |
707
|
7 |
9 |
if $text =~ /^[\s\n]*$/ |
708
|
2 |
7 |
if $text =~ /^<(o|u)l>/i |
828
|
1 |
1 |
@title ? : |