my $sth = $db->prepare("insert into news(url, header, country, country2, date, priority, userid, source, formoreinfo, language, regreqd, keywords, image, actnowcampaigncode, state) values(?,?,?,?,?,?,?,?,?,?,?,?,?,?,?)"); foreach $record (@records) { $n++; &splitupintofields; if ($priority > 0) { $y++; &convdate; &convlang; $sth->execute($url, $header, $country1, $country2, $date, $priority, $correspondent, $source, $formoreinfo, $language, $regreqd, $keywords, $image, $actnowcampaigncode, $state); } } $db->disconnect();