Branch Coverage

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


line true false branch
81 0 0 $symbol =~ /^[AI]/ ? :
82 0 0 unless ($aq_symbol_list{$key})
101 0 0 wantarray ? :
154 0 0 if ($name =~ /^((PIT )?[A-Z]+) ([A-Za-z]+) '([0-9][0-9])$/) { }
0 0 elsif ($name =~ /\((([A-Z]+)([A-Z])([0-9]+))\)/) { }
201 0 0 length $y == 1 ? :
226 0 0 unless ($resp->is_success)
237 0 0 if ($content =~ /for ([a-zA-Z]+ [0-9]{1,2}, [0-9]{4})/)
255 0 0 unless ($te->tables)
262 0 0 unless (defined $$row[0])
276 0 0 unless (defined $symbol)
284 0 0 unless (exists $want_symbol{$symbol})
292 0 0 if ($bid =~ s/([0-9]+) x //)
293 0 0 if ($ask =~ s/([0-9]+) x //)
299 0 0 if ($change =~ /unch/i)
313 0 0 if ($last_time =~ m[^\d+/\d+/\d+$])
323 0 0 if (defined $date)
330 0 0 if (defined $bid_count)
333 0 0 if (defined $ask_count)
371 0 0 unless $str =~ /^\+?(.+)-(.*)/
375 0 0 if (length $frac == 1) { }
0 0 elsif (length $frac == 2 or length $frac == 3) { }
385 0 0 if ($th > 31)
389 0 0 unless (exists $qu_to_quarter{$qu})
444 6 1 defined $4 ? :
1 7 defined $1 ? :