sub insert_flatfile {
        # Note: files opened in > mode again to prevent disk space issues

        open(FF, ">$flatfile") || die "Unable to open '$flatfile': $!";
        close(FF);
        foreach(@rows) {
                open(FF, ">>$flatfile") || die "Unable to open '$flatfile': $!";
                flock(FF,LOCK_EX);
                print FF join('|', ($_->{ID}, $_->{name}, $_->{address}, $_->{city}, $_->{state}, $_->{zip})), "\n";
                flock(FF,LOCK_UN);
                close(FF);
        }

}