my $sql = qq{ LOAD DATA LOCAL INFILE \"$mysql_tmp_filename\"
INTO TABLE `$tblname`
FIELDS TERMINATED BY ','
OPTIONALLY enclosed by '\"'
ESCAPED BY '\\\\'
LINES TERMINATED BY '\\r\\n'
IGNORE 3 LINES
(file_name,\@file_p,file_size,\@file_la,\@file_lc,\@file_c, file_extension)
set file_last_access = STR_TO_DATE(\@file_la, '%c/%e/%Y %l:%i %p'),
file_path = \@file_p,
file_share_name = substring_index(substring_index(\@file_p,'\\\\',3),'\\\\',-1),
file_last_change = STR_TO_DATE(\@file_lc, '%c/%e/%Y %l:%i %p'),
file_creation = STR_TO_DATE(\@file_c, '%c/%e/%Y %l:%i %p')
};

my $sth = $dbh->prepare($sql);
$sth->execute();

##</code><code>##

sub fix_file_4mysql {    #arguments: 1) path to file
	        #returns: 1) the filename fixed for use in a mysql query

	#fix the contents of the temp file for use in mysql
	my $tmp_filename = shift;
	
        open( IN, "+<$tmp_filename" );
	my @file = <IN>;
	seek IN, 0, 0;
	foreach my $file (@file) {
		$file =~ s/\\/\\\\/g;
		print IN $file;
	}
	close IN;

	#fix temp_filename for use in mysql
	my $mysql_tmp_filename = $tmp_filename;
	$mysql_tmp_filename =~ s/\\/\\\\/g;

	return $mysql_tmp_filename;
}