| line |
true |
false |
branch |
|
229
|
0 |
0 |
if ref $_[0] |
|
259
|
0 |
0 |
if (defined $field) { } |
|
286
|
0 |
0 |
if (&reftype(scalar $self->_get('main_source')) eq '') |
|
291
|
0 |
0 |
if ($ifh) |
|
334
|
0 |
0 |
unless defined $source |
|
335
|
0 |
0 |
if (ref $source) |
|
336
|
0 |
0 |
if (&reftype($source) eq 'GLOB') |
|
338
|
0 |
0 |
defined $s ? : |
|
363
|
0 |
0 |
if $buffer |
|
366
|
0 |
0 |
if $ifh and not $ifh->eof |
|
372
|
0 |
0 |
if ($ifh) { } |
|
374
|
0 |
0 |
unless ($self->_end_include) |
|
384
|
0 |
0 |
if (ref $source and &reftype($source) eq 'GLOB') { } |
|
388
|
0 |
0 |
unless CORE::open $ifh, '<', $source |
|
416
|
0 |
0 |
if (@_ >= 3) { } |
|
417
|
0 |
0 |
unless ($href) |
|
424
|
0 |
0 |
unless $href |
|
453
|
0 |
0 |
if (wantarray) { } |
|
461
|
0 |
0 |
if $self->EOF |
|
468
|
0 |
0 |
if $self->EOF |
|
471
|
0 |
0 |
if ($line =~ $self->_get('include')) |
|
475
|
0 |
0 |
unless $path |
|
477
|
0 |
0 |
if ($coderef) |
|
481
|
0 |
0 |
if ($path->is_relative) |
|
487
|
0 |
0 |
if (CORE::open my $newifh, '<', "$path") |
|
538
|
0 |
0 |
if (@args == 1 and ref $args[0] and &reftype($args[0]) eq 'HASH') { } |
|
546
|
0 |
0 |
if ref $source ne '' and &reftype($source) ne 'GLOB' |
|
549
|
0 |
0 |
if not $regex or &reftype($regex) ne 'REGEXP' |
|
552
|
0 |
0 |
if $coderef and &reftype($coderef) ne 'CODE' |
|
565
|
0 |
0 |
if ($ifh) |
|
567
|
0 |
0 |
if (@$ifhs) |
|
585
|
0 |
0 |
if ($buffer) |
|
588
|
0 |
0 |
if ($line =~ m[$/$]) |
|
593
|
0 |
0 |
unless (CORE::eof $ifh) |
|
633
|
0 |
0 |
if ($offset < 0) |
|
635
|
0 |
0 |
if ($offset < 0) |
|
641
|
0 |
0 |
if ($offset < $l) { } |
|
|
0 |
0 |
elsif ($offset > $l) { } |
|
652
|
0 |
0 |
if ($self->EOF) |
|
666
|
0 |
0 |
if ($self->_get('read_by_line')) { } |
|
686
|
0 |
0 |
if ($n > $length) |
|
712
|
0 |
0 |
if ($href) |
|
750
|
0 |
0 |
if ($position == 0) { } |
|
751
|
0 |
0 |
if ($whence != 1) |
|
780
|
0 |
0 |
unless ($href) |
|
824
|
0 |
0 |
unless ref $coderef eq 'CODE' |