line |
true |
false |
branch |
31
|
0 |
0 |
unless my $stockname = shift() |
35
|
0 |
0 |
unless defined $stockdata |
36
|
0 |
0 |
if ($stockdata =~ m[ |
.*?(.*?)
.*?]is) { }
38
|
0 |
0 |
unless @list |
43
|
0 |
0 |
unless ($list[11] =~ /$stockname/i) |
55
|
0 |
0 |
if ($table =~ m[ | (.*?) | (.*)]is) { }
58
|
0 |
0 |
if ($2 =~ m[(.*?)]i) { } |
73
|
0 |
0 |
if (scalar @tds != 12) |
77
|
0 |
0 |
if ($tds[$_] =~ m[(.*?)]i) { } |
91
|
0 |
0 |
if ($tds[$_] =~ m[(.*?)]i) { } |
106
|
0 |
1 |
unless (defined $stocklist) |
112
|
0 |
1 |
unless $stocklist =~ /^\d+$/ |
113
|
1 |
0 |
if ($stocklist == 0) { } |
|
0 |
0 |
elsif ($stocklist == 1) { } |
|
0 |
0 |
elsif ($stocklist == 2) { } |
|
0 |
0 |
elsif ($stocklist == 3) { } |
|
0 |
0 |
elsif ($stocklist == 4) { } |
|
0 |
0 |
elsif ($stocklist == 5) { } |
134
|
0 |
1 |
if ($list =~ m[ |
(.*?)]is)
142
|
0 |
0 |
if (@tmparr) { } |