example.cgi
my $loc = "/var/temp.txt";
my $query="load data local infile '$loc' into table test fields terminated by ',' lines terminated by '\t'";
my $update = $DB->do($query) or die "prepare failed: " . $DB->errstr();
print $update ." Records inserted";