NAME

Business::PL::PESEL - Validate Polish Universal Electronic System for Registration of the Population ID

VERSION

version 0.01

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.

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.

AUTHOR

Tomasz Konojacki <xenu@poczta.onet.pl>

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.