print $detailFH $details; $detailsLinesWritten += $detailsLineCt;