line |
true |
false |
branch |
21
|
0 |
18 |
if (not defined $_) { } |
27
|
3 |
15 |
if ($type =~ /^Bool/xi) { } |
|
9 |
6 |
elsif ($type =~ /^(Str|enum)/xi) { } |
|
0 |
6 |
elsif ($type =~ /^Int/xi) { } |
|
4 |
2 |
elsif ($type =~ /^Date/) { } |
|
0 |
2 |
elsif ($type =~ /^Ref|Any|Hash/xi) { } |
32
|
2 |
1 |
$_ ? : |
40
|
0 |
9 |
if &Scalar::Util::tainted($_) |
45
|
9 |
0 |
if /^ \s* (.*?) \s* $/x |
47
|
2 |
7 |
if $type =~ /^enum/ |
61
|
0 |
2 |
unless defined $_ |
77
|
2 |
22 |
if not defined $val or $type =~ /Ref|Array/i |
82
|
6 |
16 |
if ($type =~ /^Bool/i) { } |
|
8 |
8 |
elsif ($type =~ /^(Str|enum)/i) { } |
|
0 |
8 |
elsif ($type =~ /^Int/i) { } |
|
8 |
0 |
elsif ($type =~ /^Date/) { } |
|
0 |
0 |
elsif ($type =~ /^Ref|Any|Hash/xi) { } |
86
|
4 |
2 |
/^(true|1)$/i ? : |
92
|
8 |
0 |
if /^ \s* (.*?) \s* $/x |
94
|
2 |
6 |
if $type =~ /^enum/i |