Branch Coverage

blib/lib/Finance/Quote/MGEX.pm
Criterion Covered Total %
branch 4 52 7.6


line true false branch
83 0 0 $symbol =~ /^[AI]/ ? :
84 0 0 unless ($aq_symbol_list{$key})
103 0 0 wantarray ? :
158 0 0 if ($name =~ /^((PIT )?[A-Z]+) ([A-Za-z]+) '([0-9][0-9])$/) { }
0 0 elsif ($name =~ /\((([A-Z]+)([A-Z])([0-9]+))\)/) { }
205 0 0 length $y == 1 ? :
230 0 0 unless ($resp->is_success)
241 0 0 if ($content =~ /for ([a-zA-Z]+ [0-9]{1,2}, [0-9]{4})/)
259 0 0 unless ($te->tables)
266 0 0 unless (defined $row->[0])
280 0 0 unless (defined $symbol)
288 0 0 unless (exists $want_symbol{$symbol})
296 0 0 if ($bid =~ s/([0-9]+) x //)
297 0 0 if ($ask =~ s/([0-9]+) x //)
303 0 0 if ($change =~ /unch/i)
317 0 0 if ($last_time =~ m[^\d+/\d+/\d+$])
327 0 0 if (defined $date)
334 0 0 if (defined $bid_count)
337 0 0 if (defined $ask_count)
375 0 0 unless $str =~ /^\+?(.+)-(.*)/
379 0 0 if (length $frac == 1) { }
0 0 elsif (length $frac == 2 or length $frac == 3) { }
389 0 0 if ($th > 31)
393 0 0 unless (exists $qu_to_quarter{$qu})
449 6 1 defined $4 ? :
1 7 defined $1 ? :