Help for this page
#!/usr/bin/perl ... __DATA__ 30, 010190, Name11111 40, 020280, Name222
$ perl 930233.pl Name DOB Age ... Name11111 10190 30 Name222 20280 40 0 0