Business::TNTPost::NL is a Perl module that calculates the shipping costs for the Dutch TNT Post, based on country, weight and priority shipping (or not), etc.
The shipping cost information is based on 'Tarieven Januari 2009'.
It returns the shipping costs in euro or undef (which usually means the parcel is heavier than the maximum allowed weight; check $Business::TNTPost::NL::ERROR).
SYNOPSIS
use Business::TNTPost::NL;
my $tnt = Business::TNTPost::NL->new();
$tnt->country('DE');
$tnt->weight('534');
$tnt->large(1);
$tnt->priority(1);
$tnt->tracktrace(1);
$tnt->register(1);
$tnt->receipt(1);
my $costs = $tnt->calculate or die $Business::TNTPost::NL::ERROR;
or
use Business::TNTPost::NL;
my $tnt = Business::TNTPost::NL->new();
my $costs = $tnt->calculate(
country =>'DE',
weight => 534,
large => 1,
tracktrace => 1,
register => 1,
receipt => 1
) or die $Business::TNTPost::NL::ERROR;
Product's homepage
Requirements:
· Perl