| line | stmt | bran | cond | sub | pod | time | code | 
| 1 | 7 |  |  | 7 |  | 38 | use strict; | 
|  | 7 |  |  |  |  | 12 |  | 
|  | 7 |  |  |  |  | 166 |  | 
| 2 | 7 |  |  | 7 |  | 35 | use warnings; | 
|  | 7 |  |  |  |  | 15 |  | 
|  | 7 |  |  |  |  | 180 |  | 
| 3 | 7 |  |  | 7 |  | 33 | use MRO::Compat 'c3'; | 
|  | 7 |  |  |  |  | 12 |  | 
|  | 7 |  |  |  |  | 307 |  | 
| 4 |  |  |  |  |  |  |  | 
| 5 |  |  |  |  |  |  | package WebService::Shippo::Update; | 
| 6 |  |  |  |  |  |  | require WebService::Shippo::Request; | 
| 7 | 7 |  |  | 7 |  | 40 | use Params::Callbacks ( 'callbacks' ); | 
|  | 7 |  |  |  |  | 10 |  | 
|  | 7 |  |  |  |  | 856 |  | 
| 8 |  |  |  |  |  |  |  | 
| 9 |  |  |  |  |  |  | sub update | 
| 10 |  |  |  |  |  |  | { | 
| 11 | 0 |  |  | 0 | 0 |  | my ( $callbacks, $invocant, $id, @params ) = &callbacks; | 
| 12 | 0 |  |  |  |  |  | my $class = $invocant->item_class; | 
| 13 | 0 |  |  |  |  |  | my $response = Shippo::Request->put( $class->url( $id ), @params ); | 
| 14 | 0 |  |  |  |  |  | return $class->construct_from( $response, $callbacks ); | 
| 15 |  |  |  |  |  |  | } | 
| 16 |  |  |  |  |  |  |  | 
| 17 |  |  |  |  |  |  | BEGIN { | 
| 18 | 7 |  |  | 7 |  | 36 | no warnings 'once'; | 
|  | 7 |  |  |  |  | 10 |  | 
|  | 7 |  |  |  |  | 275 |  | 
| 19 | 7 |  |  | 7 |  | 130 | *Shippo::Updater:: = *WebService::Shippo::Updater::; | 
| 20 |  |  |  |  |  |  | } | 
| 21 |  |  |  |  |  |  |  | 
| 22 |  |  |  |  |  |  | 1; |