| blib/lib/Webservice/Shipment/Carrier/USPS.pm | |||
|---|---|---|---|
| Criterion | Covered | Total | % |
| branch | 15 | 24 | 62.5 |
| line | true | false | branch |
|---|---|---|---|
| 44 | 6 | 12 | unless my $t = $targets{$target} |
| 45 | 3 | 9 | unless my $addr = $dom->at($t) |
| 53 | 3 | 0 | if $class |
| 60 | 0 | 3 | unless $summary |
| 62 | 3 | 0 | $event =~ /delivered/iu ? : |
| 65 | 3 | 0 | $desc ? : |
| 68 | 3 | 0 | $date ? : |
| 71 | 3 | 0 | if ($date) |
| 72 | 3 | 0 | if (my $time = $summary->at('EventTime')) |
| 78 | 0 | 3 | if $@ |
| 92 | 2 | 1 | unless ($cb) |
| 101 | 0 | 1 | if $tx->error |