line |
true |
false |
branch |
23
|
0 |
0 |
unless $opt{'fmt'} |
25
|
0 |
0 |
if ($$self{'for_fmt'} ne '*') |
34
|
0 |
0 |
if ($$self{'for_fmt'} eq '*') { } |
40
|
0 |
0 |
wantarray ? : |
47
|
0 |
0 |
if ($f =~ /^(\'|\").+(\'|\")$/) { } |
|
0 |
0 |
elsif ($f =~ /^(\d+)(H)/i) { } |
|
0 |
0 |
elsif ($f =~ /^(\p{Letter})+$/) { } |
|
0 |
0 |
elsif ($f =~ /^(\p{Letter})+(\d+)$/) { } |
|
0 |
0 |
elsif ($f =~ /^(\p{Letter})+(\d+)\.(\d+)$/) { } |
|
0 |
0 |
elsif ($f =~ /^(\p{Letter})+(\d+)\.(\d+)(E|e)(\d+)$/) { } |
|
0 |
0 |
elsif ($f =~ /^(\d+)(\p{Letter})+$/) { } |
|
0 |
0 |
elsif ($f =~ /^(\d+)(\p{Letter})+(\d+)$/) { } |
|
0 |
0 |
elsif ($f =~ /^(\d+)(\p{Letter})+(\d+)\.(\d+)$/) { } |
|
0 |
0 |
elsif ($f =~ /^(\d+)(\p{Letter})+(\d+)\.(\d+)(E|e)(\d+)$/) { } |
98
|
0 |
0 |
unless $int |
99
|
0 |
0 |
if ($frac == 0 and not $int) |
104
|
0 |
0 |
if ($r < 0) |
106
|
0 |
0 |
if $fn[$#fn] >= 5 |
117
|
0 |
0 |
$1 eq ' ' ? : |
124
|
0 |
0 |
if $int and $e_d_s eq '-' |
125
|
0 |
0 |
if $int and $e_d_s eq '+' |
127
|
0 |
0 |
if ($$h{'e'}) { } |
|
0 |
0 |
elsif ($exp <= 99) { } |
|
0 |
0 |
elsif (99 < $exp and $exp <= 999) { } |
128
|
0 |
0 |
if ($exp <= 10 ** $$h{'e'} - 1) |
140
|
0 |
0 |
if $fn[$#fn] >= 5 |
149
|
0 |
0 |
if int $val != $val |
151
|
0 |
0 |
$val < 0 ? : |
156
|
0 |
0 |
if (not $d) { } |
157
|
0 |
0 |
if ($val) { } |
160
|
0 |
0 |
if ($d eq '') { } |
169
|
0 |
0 |
if ($d > $w or length "$sign$int" > $w) |
183
|
0 |
0 |
if ($$h{'w'}) { } |
194
|
0 |
0 |
if ($$self{'for_fmt'} eq '*') |
200
|
0 |
0 |
if ($ed eq 'X') { } |
|
0 |
0 |
elsif (exists $$f{'str'}) { } |
205
|
0 |
0 |
if ($ed eq 'A') { } |
|
0 |
0 |
elsif ($ed eq 'I') { } |
|
0 |
0 |
elsif ($ed eq 'F') { } |
|
0 |
0 |
elsif ($ed eq 'E' or $ed eq 'D') { } |
214
|
0 |
0 |
if $i++ > $#vals |
230
|
0 |
0 |
if ($c eq q['] || $c eq '"' and not $t) { } |
|
0 |
0 |
elsif ("$t$c" =~ /^\d+$/ and $chars[0] =~ /H/i) { } |
|
0 |
0 |
elsif ($c eq '(') { } |
|
0 |
0 |
elsif ($c eq ')') { } |
|
0 |
0 |
elsif ($c eq ',') { } |
235
|
0 |
0 |
@chars ? : |
239
|
0 |
0 |
if (not @rep) { } |
|
0 |
0 |
elsif (@tok) { } |
240
|
0 |
0 |
if $t |
242
|
0 |
0 |
if $t |
250
|
0 |
0 |
if (not @rep) { } |
|
0 |
0 |
elsif (@tok) { } |
257
|
0 |
0 |
unless ($t) |
263
|
0 |
0 |
if $t |
271
|
0 |
0 |
if (not @rep) { } |
273
|
0 |
0 |
if $t |
275
|
0 |
0 |
if $t |
279
|
0 |
0 |
if (not @rep) { } |
|
0 |
0 |
elsif (@tok) { } |
280
|
0 |
0 |
if $t |
282
|
0 |
0 |
if $t |
286
|
0 |
0 |
if $c ne ' ' |
289
|
0 |
0 |
if $t |
305
|
0 |
0 |
if ($f =~ /^(\'|\").*(\'|\")$/) { } |
|
0 |
0 |
elsif ($f =~ /^\d+[H]/i) { } |
319
|
0 |
0 |
if ($d =~ /(A|B|D|E|F|G|Q|I|L|O|Z)/i) { } |
|
0 |
0 |
elsif ($d =~ /X/i) { } |
320
|
0 |
0 |
if $w |
321
|
0 |
0 |
if not $w and uc $d eq 'A' |
342
|
0 |
0 |
if $val =~ /\.(true|false)\./i |
369
|
0 |
0 |
if $nv |
374
|
0 |
0 |
!$sep && $c eq ',' ? : |
375
|
0 |
0 |
if $ok |