print Dumper ($from, $to, $packages, $args);

$VAR1 = bless( [
                 undef,
                 undef,
                 '60446',
                 undef,
                 undef,
                 undef
               ], 'Net::UPS::Address' );
$VAR2 = bless( [
                 undef,
                 undef,
                 '65432',
                 undef,
                 undef,
                 undef
               ], 'Net::UPS::Address' );
$VAR3 = [
          bless( [
                   undef,
                   undef,
                   undef,
                   undef,
                   undef,
                   undef,
                   '2.26'
                 ], 'Net::UPS::Package' )
        ];
$VAR4 = {
          'mode' => 'shop',
          'service' => 'GROUND'
        };