NAME
Business::TNTPost::NL - Calculate Dutch (TNT Post) shipping costs
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);
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,
) or die $Business::TNTPost::NL::ERROR;
DESCRIPTION
This module 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 2011'.
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
).
METHODS
The following methods can be used
new
new
creates a new Business::TNTPost::NL
object. No more, no less.
country
Sets the country (ISO 3166, 2-letter country code) and returns the zone number used by TNT Post (or 0 for The Netherlands (NL)).
This value is mandatory for the calculations.
Note that the reserved IC has been used for the Canary Islands. This has not been adopted by ISO 3166 yet. The Channel Islands are completely ignored due to a lack of a code.
calculate
Method to calculate the actual shipping cost based on the input (see methods above). These options can also be passed straight in to this method (see SYNOPSIS).
Two settings are mandatory: country and weight. The rest are given a default value that will be used unless told otherwise.
Returns the shipping costs in euro, or undef (see $Business::TNTPost::NL::ERROR in that case).
_generate_path
Internal method to create the path to walk through the pricing table. Don't call this, use calculate instead.
_pointer_to_element
Blame merlyn for this internal method. It's using List::Util to "grep" the information needed.
Don't call this, use calculate instead.
weight
Sets and/or returns the weight of the parcel in question in grams.
This value is mandatory for the calculations.
large
Sets and/or returns the value of this option. Defaults to undef (meaning: the package will fit through the mail slot).
tracktrace
Sets and/or returns the value of this options. Defaults to undef (meaning: no track & trace feature wanted). When a parcel destined for abroad weighs over 2 kilograms, default is 1, while over 2kg it's not even optional anymore.
register
Sets and/or returns the value of this options. Defaults to undef (meaning: parcel is not registered (Dutch: aangetekend)).
machine
Sets and/or returns the value of this options. Defaults to undef (meaning: stamps will be used, not the machine (Dutch: frankeermachine)).
Only interesting for destinies within NL. Note that "Pakketzegel AVP" and "Easystamp" should also use this option.
BUGS
Please do report bugs/patches to http://rt.cpan.org/Public/Dist/Display.html?Name=Business-TNTPost-NL
CAVEAT
The Dutch postal agency (TNT Post) uses many, many, many various ways for you to ship your parcels. Some of them are included in this module, but a lot of them not (maybe in the future? Feel free to patch ;-)
This module handles the following shipping ways (page numbers refer to the TNT Post booklet (sorry, all in Dutch)).
'Brieven' and 'Pakketten' either paid by 'frankeermachine'. For both, 'aangetekend' is optional. The pagenumbers used: 18, 19, 20, 21.
These should be the most commom methods of shipment.
AUTHOR
Menno Blom, <blom@cpan.org>, http://menno.b10m.net/perl/
COPYRIGHT
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
The full text of the license can be found in the LICENSE file included with this module.
SEE ALSO
http://www.tntpost.nl/, http://www.tntpost.nl/zakelijk/Images/TNP%20TB%20digitaal_2_tcm210-527873.pdf, http://www.iso.org/iso/en/prods-services/iso3166ma/index.html