| line |
true |
false |
branch |
|
26
|
0 |
8 |
unless open my $fh, '<', $file |
|
32
|
0 |
8 |
unless scalar @headers == $numFields |
|
35
|
0 |
8 |
if $blankLine =~ /\w/ |
|
41
|
239 |
0 |
if ($dateString =~ m[^(\d{1,2})/(\d{1,2})/(\d{4})\s+(\d{1,2}):(\d{2}):(\d{2})\s+(\wM)$]i) { } |
|
43
|
74 |
165 |
if ($pm =~ /^PM$/i and $hour < 12) |
|
66
|
239 |
7 |
if (my $line = <$fh>) { } |
|
74
|
1912 |
0 |
if (exists $row[$index]) |
|
76
|
239 |
1673 |
if ($key eq 'action') { } |
|
|
239 |
1434 |
elsif ($key eq 'date') { } |
|
|
239 |
1195 |
elsif ($key eq 'totalCost') { } |
|
87
|
956 |
239 |
if ($key =~ /^(?:price|quantity|commission|regulatoryFees)$/) |
|
95
|
96 |
143 |
if ($action eq 'Sell') { } |
|
|
143 |
0 |
elsif ($action eq 'Buy') { } |
|
104
|
0 |
7 |
unless close $fh |