| line |
true |
false |
branch |
|
216
|
5 |
1 |
unless ref $name |
|
220
|
2 |
1 |
unless $k eq 'buff' |
|
262
|
2 |
0 |
unless ref $file |
|
278
|
0 |
19 |
if $opts{'DELIM'} |
|
288
|
26 |
67 |
if ($buff =~ s/^$L=(.*?)$R//s) { } |
|
|
22 |
45 |
elsif ($buff =~ s/^$L(.*?)$R//s) { } |
|
|
34 |
11 |
elsif ($buff =~ s/^(.*?)(?=$L)//s) { } |
|
289
|
26 |
0 |
if $1 |
|
293
|
22 |
0 |
if $1 |
|
297
|
34 |
0 |
if ($temp = $1) |
|
311
|
11 |
8 |
if ($temp = $buff) |
|
316
|
0 |
19 |
if $Text::ScriptTemplate::DEBUG |
|
361
|
0 |
19 |
if (UNIVERSAL::isa($from, 'Safe')) { } |
|
363
|
0 |
0 |
$@ ? : |
|
374
|
0 |
42 |
if ($DEBUG) |
|
381
|
0 |
19 |
if (${"${name}::_OHANDLE";} = $opts{'OHANDLE'}) { } |