Business::AU::TFN - Validate TFN - Australian Tax File Name

    use Business::AU::TFN;

    print Business::AU::TFN::validate("123 456 782");

Details come from http://bioinf.wehi.edu.au/folders/fred/tfn.html

Currently these are package methods which must be called explicitly. Although I am considering making this better.

Validate a tax file number. Return value is one of

'valid' - yep, completely valid

'invalid length' - Must be 9 characteres (spaces accepted)

'invalid sum' - does not match

This prints out a valid pretty print of an TFN The standards says that it must be showed in groups of three (nnn nnn nnn).

Scott Penrose <scottp@dd.com.au>

Business::AU::ACN, Business::AU::ABN