Business::UPS 2.01

Business::UPS is a Perl module that offers a way of sending four arguments to a module to get shipping charges that can be used in, say, a CGI.

SYNOPSIS

 use Business::UPS;

 my ($shipping,$ups_zone,$error) = getUPS(qw/GNDCOM 23606 23607 50/);
 $error and die "ERROR: $error
";
 print "Shipping is $$shipping
";
 print "UPS Zone is $ups_zone
";

 %track = UPStrack("z10192ixj29j39");
 $track{error} and die "ERROR: $track{error};

 # 'Delivered' or 'In-transit'
 print "This package is $track{Current Status}
";


Product's homepage

Requirements:

· Perl
· LWP::UserAgent