line |
true |
false |
branch |
102
|
0 |
0 |
$] > 5.00562 ? : |
104
|
0 |
0 |
unless my $file = $_[0] |
106
|
0 |
0 |
if UNIVERSAL::isa($file, 'HASH') |
108
|
0 |
0 |
unless (-e $file) |
109
|
0 |
0 |
if (-e "$_[0].xml") { } |
|
0 |
0 |
elsif (-e "$_[0].fmt") { } |
|
0 |
0 |
elsif (-e "$_[0].tt2") { } |
120
|
0 |
0 |
if -e ($file = $inc . '/OurNet/Site/' . $_[0]) |
121
|
0 |
0 |
if -e ($file = $inc . '/OurNet/Site/' . "$_[0].xml") |
122
|
0 |
0 |
if -e ($file = $inc . '/OurNet/Site/' . "$_[0].fmt") |
123
|
0 |
0 |
if -e ($file = $inc . '/OurNet/Site/' . "$_[0].tt2") |
128
|
0 |
0 |
unless -e $file |
158
|
0 |
0 |
if ($_[0] =~ /\.tt2$/i) { } |
|
0 |
0 |
elsif ($_[0] =~ /\.xml$/i) { } |
|
0 |
0 |
elsif ($_[0] =~ m((?:.*[/\\])?(.*?)(?:\.fmt)?$)i) { } |
172
|
0 |
0 |
if $content =~ //i |
175
|
0 |
0 |
if $content =~ m[<$tag>$xml_cdata_re]is |
183
|
0 |
0 |
if ($content =~ m[(.*?)]i) |
191
|
0 |
0 |
if ($$self{'name'}{'en-us'} =~ s/\((.+)\)//) |
196
|
0 |
0 |
if ($$self{'url'}{'start'} =~ /_START_\d+_\d+_/) |
237
|
0 |
0 |
/^TYPE\t(.+)/ ? : |
|
0 |
0 |
/^EXPR\t(.+)/ ? : |
|
0 |
0 |
/^CHS\t(.+)/ ? : |
|
0 |
0 |
/^CHT\t(.+)/ ? : |
|
0 |
0 |
/^CHARSET\t(.+)/ ? : |
|
0 |
0 |
/^SCORE\t(.+)/ ? : |
|
0 |
0 |
/^VAR\t(.+)/ ? : |
|
0 |
0 |
/^PROC\t(.+)/ ? : |
|
0 |
0 |
/^MORE\t(.+)/ ? : |
|
0 |
0 |
m[^\w+://] ? : |
|
0 |
0 |
/^---/ ? : |
246
|
0 |
0 |
unless /^[A-Z_]*$/ |
248
|
0 |
0 |
$_ ? : |
265
|
0 |
0 |
if ($$self{'tmplobj'}) |
280
|
0 |
0 |
if $length == length $content |
293
|
0 |
0 |
if $var eq '_' |
296
|
0 |
0 |
unless ($$self{'allow_tags'}) |
301
|
0 |
0 |
if ($var eq 'sizek') { } |
|
0 |
0 |
elsif ($var eq 'score') { } |
|
0 |
0 |
elsif ($var eq 'url') { } |
310
|
0 |
0 |
if ($proc =~ /^\d*/) { } |
325
|
0 |
0 |
unless ($$entry{$var} =~ m[^\w+://]) |
326
|
0 |
0 |
if ($$self{'url'}{'home'}) { } |
|
0 |
0 |
elsif (not $$self{'allow_partial'} and $$self{'url'}{'start'} =~ m[^(\w+://.*?)/]) { } |
340
|
0 |
0 |
unless ($$entry{'score'}) |
346
|
0 |
0 |
if (my $proc = $$self{'proc'}) |
374
|
0 |
0 |
unless ($$self{'tmplobj'}) |
383
|
0 |
0 |
if (defined $callback) { } |
395
|
0 |
0 |
if ($chunk =~ /{{(.*?)}}/) { } |