line |
true |
false |
branch |
125
|
1 |
0 |
unless ref $self |
138
|
0 |
1 |
wantarray ? : |
151
|
0 |
0 |
unless ref $self |
164
|
0 |
0 |
wantarray ? : |
172
|
0 |
3 |
unless $$self{'source_file'} |
174
|
0 |
3 |
unless open $$self{'fh'}, $$self{'source_file'} |
188
|
3 |
0 |
if (@_) |
208
|
2 |
0 |
if (@_) |
240
|
0 |
5 |
ref $_[0] ? : |
241
|
0 |
5 |
ref $_[0] ? : |
267
|
11 |
9 |
if ($$self{'source_file'}) |
268
|
3 |
8 |
unless $$self{'fh'} |
272
|
9 |
11 |
if ($$self{'source_text'}) |
273
|
2 |
7 |
unless $$self{'text'} |
276
|
0 |
20 |
unless $fh or $$self{'text'} |
281
|
11 |
9 |
$fh ? : |
282
|
5 |
15 |
if $self->eod |
287
|
0 |
15 |
if ($line =~ /\000/) |
290
|
0 |
0 |
if $@ |
292
|
0 |
0 |
if ($line =~ /\000\000\000/) { } |
294
|
0 |
0 |
if ($line =~ /^\000/) { } |
302
|
0 |
0 |
if ($line =~ /^\000/) { } |
312
|
0 |
15 |
if $decoder |
317
|
0 |
0 |
$fh ? : |
318
|
0 |
0 |
if $self->eod |
319
|
0 |
0 |
if $decoder |
325
|
0 |
15 |
unless $class |
328
|
0 |
15 |
if $@ |
337
|
48 |
42 |
$fh ? : |
339
|
0 |
90 |
if $decoder |
343
|
0 |
90 |
if ($line =~ /^BEGIN:(.+)/) |
352
|
15 |
75 |
if ($line =~ /^END:(.*)/) |
353
|
0 |
15 |
unless uc $1 eq $kind |
361
|
0 |
15 |
unless $ended |
374
|
15 |
60 |
if ($line =~ /^([\w\-]+):(.*)/) |
378
|
0 |
15 |
if (UNIVERSAL::can($thing, "load_$var")) { } |
383
|
0 |
15 |
if exists $$varHandler{$var} |
390
|
60 |
0 |
if ($line =~ /^([\w\-]+);([^:]*):(.*)/) |
399
|
0 |
60 |
if (UNIVERSAL::can($thing, "load_$var")) { } |
402
|
60 |
0 |
exists $attr{'type'} ? : |
405
|
0 |
60 |
if exists $$varHandler{$var} |
428
|
59 |
51 |
if ($_[0]{'fh'}) |
432
|
49 |
2 |
if exists $_[0]{'text'} and @{$_[0]{'text'};} |