Sample from my parser in perl...
$ for x in `ls -1 a*txt` ; do echo "$x"; perl [login to view URL] $x ; done
[login to view URL]
"9","28","1716","ALTENHOF","FRIEDERIC","UNK","EVE","MARIE ANG","LA AACH",""
"11","28","1723","ALTENHOFE","PETER","THEISEN","ANNE","MARIE","AACH",""
"12","13","1725","ALTENHOFE","PETER","THEISEN","ANNE","MARIE ELI","ABETHAACH",""
"6","22","1730","ALTENHOFE","PETER","THEISEN","ANNE","MARGARET","AACH",""
[login to view URL]
"8","4","1832","HIMPELER","MICHAEL","BILLEN","CATHERINE","NICOLAS","ACHTERBURG"
"1","19","1831","HIMPELER","THEODORE","SCHMIT","CATHERINE","MARIE","ACHTERBURG"
"7","1","1832","HIMPELER","THEODORE","SCHMITT","CATHERINE","ANNE CATHERINE","ACHTERBURG"
"12","17","1847","HIMPELER","THEODORE","SCHMITT","CATHERINE","CATHERINE","ACHTERBURG"
[login to view URL]
"6","9","1785","ANTONI","NICOLAS","THEIS","ELIZABETH","GIRL","AFFLER"
"11","12","1861","ARENS","NICOLAS","MUNCKLE","CATHERINE","JACOBUS","AFFLER"
"3","26","1863","ARENS","NICOLAS","MUNCKLE","CATHERINE","ELIZABETH","AFFLER"
"3","29","1865","ARENS","NICOLAS","MUNCKLE","CATHERINE","JOANNES","AFFLER"