Business::AT::SSN
use Business::AT::SSN;
Business::AT::SSN checks Austrian social security numbers (Sozialversicherungsnummer) for wellformed-ness according to https://www.sozialversicherung.at/portal27/portal/ecardportal/content/contentWindow?&contentid=10008.551806&action=b&cacheability=PAGE
if possible (not all SSNs contain a valid date) it also creates a DateTime Object with the date of birth
-
my $obj = Business::AT::SSN->new([$ssn])
The new constructor optionally takes a ssn number
-
$obj->ssn([$ssn])
if no argument is given, it returns the current ssn number. if an argument is provided, it will set the ssn number.
-
$obj->is_valid()
Returns true if the ssn number is valid.
-
$obj->date_of_birth
Returns the date of birth as a DateTime object
-
$array_ref = $obj->error_messages
Returns a array ref of error messages after calling is_valid
Mark Hofstetter mark@hofstetter.at
Copyright 2014- Mark Hofstetter
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.