my $dbh = DBI->connect('DBI:mysql:nikos_db', 'root', 'censored') or {RaiseError=>1}; my $rep = $dbh->prepare( "REPLACE INTO `games` (`gamename`, `gamedesc`, `gamecounter`) VALUES (?, ?, ?)" ); open (FILE, "<../data/games/descriptions.txt") or die $!; while () { chomp; $rep->execute( split(/\t/, $_, 2) , 0 ) or print $dbh->errstr; } close (FILE); $rep->finish; $dbh->disconnect;