my $dbh=DBI->connect("DBI:mysql:database=pings;host=$host;mysql_connect_timeout=10","$user","$password") or die "$!\n";
$sth=$dbh->prepare("LOAD DATA LOCAL INFILE 'MYFIFO' INTO TABLE $table FIELDS TERMINATED BY ',' LINES TERMINATED BY '\n'") or print "$!\n".$dbh->{'mysql_error'};
$sth->execute() or print "$!\n".$dbh->{'mysql_error'};
$sth->finish() or print "$!\n".$dbh->{'mysql_error'};
$dbh->disconnect() or print "Trouble disconnecting! $!\n";