blib/lib/Webservice/Shipment/Carrier/UPS.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
branch | 12 | 20 | 60.0 |
line | true | false | branch |
---|---|---|---|
52 | 0 | 24 | unless my $t = $targets{$target} |
53 | 12 | 12 | unless my $addr = $dom->at("Shipment ShipTo Address $t") |
59 | 0 | 4 | unless my $service = $dom->at('Shipment Service Description') |
61 | 3 | 1 | unless $text =~ /UPS/u |
80 | 4 | 0 | if ($d) { } |
91 | 0 | 0 | $status ? : |
101 | 0 | 4 | unless my $weight = $dom->at('Shipment ShipmentWeight') |
116 | 3 | 1 | unless ($cb) |
125 | 0 | 1 | if $tx->error |
138 | 0 | 4 | unless $dom->at('Response ResponseStatusCode')->text |