NAME
Phone::Number - Module to hold a phone number from a UK-centric point of
view.
head1 VERSION
Version 1.0.0
SYNOPSYS
use Phone::Number;
my $num = new Phone::Number('02002221666');
print $num->formatted; # 020 0222 1666
print $num->packed; # 02002221666
print $num->number; # +442002221666
print $num->plain; # 442002221666
print $num->uk ? "yes" : "no"; # yes
EXPORT
Nothing is exported
ROUTINES
new
Creates a new, immutable object using any unambiguous phone number
format.
my $num = new Phone::Number('02002221666');
my $num = new Phone::Number('2002221666');
my $num = new Phone::Number('442002221666');
my $num = new Phone::Number('+442002221666');
my $new = new Phone::Number($num);
formatted
Returns the number formatted with leading 0 and spaces.
This can be used for displaying the number in "standard" format.
packed
Returns the number with a leading 0 but no spaces.
This can be useful for databases but see plain below.
number
Returns the number in international format starting with +.
plain
Returns the number in international format without the +.
This is usually the best way to store the number onto a database.
uk
Returns a boolean: true if it is a valid UK number
AUTHOR
Cliff Stanford, `<
[email protected]>'
BUGS
Please report any bugs or feature requests to `bug-phone-number at
rt.cpan.org', or through the web interface at
http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Phone-Number. I will be
notified, and then you'll automatically be notified of progress on your
bug as I make changes.
SUPPORT
You can find documentation for this module with the perldoc command.
perldoc Phone::Number
LICENSE AND COPYRIGHT
Copyright 2014 Cliff Stanford.
This program is free software; you can redistribute it and/or modify it
under the same terms as Perl itself.
