while(my $line = <INFILE> ) {
    $csv->parse($line);
    my ( $state,$city,$location ) = $csv->fields();  # assumming these are col1,col2,col3
    $sth->execute($state,$city,$location) or die "Couldn't execute query: $dbh->errstr";
}

##</code><code>##

my $sql =<<SQL;
LOAD DATA LOCAL INFILE '$infile' 
INTO TABLE tbl_name
FIELDS TERMINATED BY ',' OPTIONALLY ENCLOSED BY '"'
SQL

$dbh->do($sql);