| line |
true |
false |
branch |
|
428
|
21 |
0 |
defined $_[0] ? : |
|
431
|
0 |
21 |
unless ref $opt eq 'HASH' |
|
434
|
0 |
21 |
unless exists $$opt{'file'} |
|
438
|
0 |
21 |
if (exists $$opt{'got_buffer'}) { } |
|
439
|
0 |
0 |
unless ref $$opt{'got_buffer'} eq 'ARRAY' |
|
447
|
0 |
21 |
if (exists $$opt{'unget_buffer'}) { } |
|
448
|
0 |
0 |
unless ref $$opt{'unget_buffer'} eq 'ARRAY' |
|
463
|
0 |
0 |
unless (exists $ALLOW_ISA{$name} or exists $ALLOW_REF{$name} or exists $ALLOW_RX{$name} or exists $ALLOW_VALUE{$name}) |
|
471
|
2497 |
0 |
if (ref $val and exists $ALLOW_ISA{$name}) |
|
473
|
2497 |
0 |
if &UNIVERSAL::isa($val, $class) |
|
478
|
0 |
0 |
if (ref $val and exists $ALLOW_REF{$name}) |
|
479
|
0 |
0 |
if exists $ALLOW_REF{$name}{ref $val} |
|
483
|
0 |
0 |
if (defined $val and not ref $val and exists $ALLOW_RX{$name}) |
|
485
|
0 |
0 |
if $val =~ /$rx/ |
|
490
|
0 |
0 |
if (not ref $val and exists $ALLOW_VALUE{$name}) |
|
491
|
0 |
0 |
if exists $ALLOW_VALUE{$name}{$val} |
|
535
|
506 |
1006 |
if ($tok = $self->pop_unget_buffer) { } |
|
544
|
991 |
231 |
if $line =~ /\S/ |
|
548
|
991 |
15 |
if ($line) |
|
602
|
472 |
0 |
if (defined $prev) { } |
|
629
|
0 |
1969 |
unless &_value_is_allowed('got_buffer', @_) |
|
639
|
0 |
507 |
unless &_value_is_allowed('unget_buffer', @_) |
|
650
|
0 |
21 |
unless defined $val |
|
653
|
0 |
21 |
unless &_value_is_allowed('file', $val) |
|
663
|
0 |
21 |
unless &_value_is_allowed('got_buffer', @_) |
|
727
|
0 |
21 |
unless &_value_is_allowed('unget_buffer', @_) |
|
751
|
0 |
507 |
unless defined $tok |