Select Code to Download

    my $NUM_FIELDS = 14;

...
    }

    $sth->finish;

    while (<FILE>) {
        my @line = (parse_cvs($_));
...
        $sth->execute(@line);
        $sth->finish;
    }