sub ProcessRecords() { my ($myNbr, $totalChilds, $totalAccts, @acctArray) = @_;