Branch Coverage

blib/lib/Finance/SE/OMX.pm
Criterion Covered Total %
branch 4 40 10.0


.*?(.*?).*?]is) { } (.*)]is) { } (.*?)]is)
line true false branch
31 0 0 unless my $stockname = shift()
35 0 0 unless defined $stockdata
36 0 0 if ($stockdata =~ m[
38 0 0 unless @list
43 0 0 unless ($list[11] =~ /$stockname/i)
55 0 0 if ($table =~ m[(.*?)
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[
142 0 0 if (@tmparr) { }