| line |
true |
false |
branch |
|
61
|
5 |
15 |
unless (defined $HAS_ENCODE) |
|
68
|
0 |
5 |
$@ ? : |
|
80
|
0 |
20 |
unless &hasEncode() |
|
85
|
5 |
15 |
unless $encoding |
|
100
|
2190 |
0 |
if $needBinmode |
|
108
|
1049 |
0 |
if $needBinmode |
|
158
|
100 |
4025 |
if (defined $got and $got eq "filename" and defined $_[0] and $_[0] eq "-") |
|
173
|
24 |
2087 |
if (defined $got and $got eq "filename" and defined $_[0] and $_[0] eq "-") |
|
185
|
1828 |
12624 |
if &isaFilehandle($_[0]) |
|
192
|
0 |
12624 |
if not defined $_[0] and $undef |
|
194
|
6193 |
6431 |
if (ref $_[0]) |
|
195
|
60 |
6133 |
if builtin::blessed($_[0]) |
|
197
|
5799 |
334 |
if UNIVERSAL::isa($_[0], "SCALAR") |
|
198
|
290 |
44 |
if UNIVERSAL::isa($_[0], "ARRAY") and $extended |
|
199
|
0 |
44 |
if UNIVERSAL::isa($_[0], "HASH") and $hash |
|
200
|
2 |
42 |
if UNIVERSAL::isa($_[0], "CODE") and $wantCode |
|
204
|
195 |
6236 |
if $extended and isaFileGlobString($_[0]) |
|
236
|
30 |
1513 |
unless ($inType) |
|
249
|
30 |
1483 |
unless ($outType) |
|
256
|
15 |
1468 |
if ($inType ne "fileglob" and $outType eq "fileglob") |
|
266
|
35 |
1433 |
if ($inType eq "fileglob" and $outType eq "fileglob") |
|
271
|
15 |
20 |
unless ($mapper) |
|
280
|
45 |
434 |
if $inType eq $outType and $_[0] eq $_[1] and $_[0] ne "-" |
|
283
|
110 |
1278 |
if ($inType eq 'fileglob') { } |
|
|
341 |
937 |
elsif ($inType eq 'filename') { } |
|
|
175 |
762 |
elsif ($inType eq 'array') { } |
|
288
|
0 |
110 |
if (@inputs == 0) { } |
|
|
35 |
75 |
elsif (@inputs == 1) { } |
|
295
|
0 |
35 |
unless $obj->validateInputFilenames($inputs[0]) |
|
303
|
0 |
75 |
unless $obj->validateInputFilenames(@inputs) |
|
311
|
30 |
281 |
unless $obj->validateInputFilenames($_[0]) |
|
317
|
5 |
120 |
unless $obj->validateInputArray($_[0]) |
|
322
|
15 |
1258 |
if $outType eq "buffer" and &readonly(${$_[1];}) |
|
324
|
335 |
923 |
if ($outType eq "filename") |
|
326
|
0 |
335 |
if not defined $_[1] or $_[1] eq "" |
|
329
|
156 |
179 |
if (-e $_[1]) |
|
331
|
15 |
141 |
if (-d _) |
|
364
|
40 |
781 |
if not defined $filename or $filename eq "" |
|
367
|
0 |
781 |
if $filename eq "-" |
|
369
|
15 |
766 |
unless (-e $filename) |
|
374
|
15 |
751 |
if (-d _) |
|
392
|
5 |
170 |
if (@{$_[0];} == 0) |
|
401
|
20 |
240 |
if (not $inType) { } |
|
|
220 |
20 |
elsif ($inType eq 'filename') { } |
|
407
|
0 |
210 |
unless $self->validateInputFilenames($element) |
|
450
|
6432 |
0 |
if $] >= "5.005" |
|
509
|
1 |
10 |
if @_ == 2 and defined $_[1] and UNIVERSAL::isa($_[1], "IO::Compress::Base::Parameters") |
|
513
|
20 |
37 |
unless $p->parse(@_) |
|
534
|
0 |
0 |
if @$v != 2 |
|
541
|
0 |
0 |
unless $obj->_checkType($key, \$value, $type, 0, \$x) |
|
575
|
0 |
77 |
@_ ? : |
|
601
|
1215 |
4468 |
if (@_ == 0) { } |
|
|
20 |
4448 |
elsif (@_ == 1) { } |
|
607
|
15 |
5 |
if not defined $href && ref $href or ref $href ne "HASH" |
|
618
|
0 |
4448 |
if $count % 2 != 0 |
|
632
|
75508 |
3821 |
if ($firstTime) { } |
|
655
|
12626 |
27 |
if ($got->{$canonkey}) { } |
|
661
|
1 |
12625 |
if $parsed |
|
665
|
34 |
12591 |
unless $self->_checkType($key, $value, $type, 1, \$s) |
|
676
|
27 |
5606 |
if (@Bad) |
|
697
|
25 |
12600 |
if ($type & 1536) |
|
699
|
1 |
24 |
if &readonly($$value) |
|
702
|
12 |
12 |
if (ref $$value) { } |
|
704
|
11 |
1 |
if ref $$value ne "SCALAR" |
|
711
|
1 |
11 |
if ref $value ne "SCALAR" |
|
723
|
2489 |
10111 |
if ($type & 1) { } |
|
|
475 |
9636 |
elsif ($type & 2) { } |
|
|
99 |
9537 |
elsif ($type & 4) { } |
|
|
9531 |
6 |
elsif ($type & 8) { } |
|
|
1 |
5 |
elsif ($type & 16) { } |
|
|
4 |
1 |
elsif ($type & 32) { } |
|
731
|
4 |
471 |
unless defined $value |
|
733
|
11 |
460 |
unless $value =~ /^\d+$/ |
|
736
|
460 |
0 |
defined $value ? : |
|
741
|
1 |
98 |
unless defined $value |
|
743
|
1 |
97 |
unless $value =~ /^-?\d+$/ |
|
746
|
97 |
0 |
defined $value ? : |
|
751
|
3 |
9528 |
if defined $value and not $value =~ /^\d*$/ |
|
754
|
8326 |
1202 |
defined $value && $value != 0 ? : |
|
760
|
0 |
1 |
defined $value ? : |
|
765
|
1 |
3 |
if not defined $value or ref $value ne "CODE" |
|
768
|
3 |
0 |
defined $value ? : |
|
806
|
1967 |
389 |
if defined $value |
|
842
|
11262 |
20 |
if @_ == 1 |
|
845
|
3 |
17 |
if @_ == 2 |
|
848
|
17 |
0 |
if @_ == 3 |
|
903
|
412 |
15620 |
if (ref $value eq 'U64') { } |
|
|
0 |
15620 |
elsif ($value > 4294967295) { } |
|
914
|
2 |
16030 |
if ($value > $available) { } |
|
928
|
0 |
843 |
if ($value > 4294967295) |
|
935
|
0 |
843 |
if ($value > $available) { } |
|
949
|
2 |
2 |
if (ref $value eq "U64") |
|
951
|
2 |
0 |
if ($value->[1]) |
|
952
|
0 |
2 |
if $self->[1] == 0 or $value->[1] > $self->[1] |
|
962
|
3 |
1 |
if ($value > $self->[0]) { } |
|
1001
|
0 |
3 |
if ($self->[0] == $other->[0]) { } |