my $sql_fmt = "INSERT INTO whatever VALUES( %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s, %s)"; 
while (<INFILE>)   {
    my @line = (parse_csv ($_)); 
    my  $sql = sprintf ($sql_fmt, @line); #Elements of @line need to be in quotes
    $dbh->do($sql);
}