Why not adopt me?
This distribution is up for adoption!
If you're interested then please contact the PAUSE module admins via
email.
NAME
Business::IBAN::Validator - A validator for the structure of IBANs.
SYNOPSIS
use Business::IBAN::Validator;
my $v = Business::IBAN::Validator->new;
while (1) {
print 'Enter IBAN: ';
chomp(my $input = <>);
last if !$input;
eval { $v->validate($input) };
if ($@) {
print "Not ok: $@";
}
else {
print "OK\n";
}
}
DESCRIPTION
This module does a series of checks on an IBAN:
$v = Business::IBAN::Validator->new()
Return an IBAN validator object.
$v->validate($iban)
Perform a series of checks, and die() as soon as one fails.
Return 1 on success.
$v->is_sepa($iban)
Return the SEPA status of the country (as denoted by the first two letters).
STUFF
(c) MMXIII - Abe Timmerman <abeltje@cpan.org>