NAME
Business::PL::PESEL - Validate Polish Universal Electronic System for Registration of the Population ID
VERSION
version 0.09
SYNOPSIS
use Business::ID::PESEL;
my $pesel = Business::PL::PESEL->new(-pesel => 49040501580);
print $pesel->birth_date->month;
DESCRIPTION
This module can be used to validate and analyze PESEL number. All methods (except ->is_valid) die on failure.
METHODS
new(-pesel=>$pesel_number)
Create a new Business::PL::PESEL
object.
is_valid()
Check whether supplied PESEL number is valid. Returns 1 on success and 0 on failure.
is_male()
Check if supplied PESEL numbers belongs to male person. Returns 1 if true, 0 if false.
is_female()
Check if supplied PESEL numbers belongs to female person. Returns 1 if true, 0 if false.
birth_date()
Returns birth date (Time::Piece object) of person identified by supplied PESEL ID.
BUGS
None known.
GIT REPOSITORY
git://git.savannah.nongnu.org/perl-pesel.git
Mirror: git://github.com/xenu/business-pl-pesel.git
AUTHOR
Tomasz Konojacki <[email protected]>
COPYRIGHT AND LICENSE
This software is copyright (c) 2012 by Tomasz Konojacki.
This is free software; you can redistribute it and/or modify it under the terms of MIT license.