while (<FH>) {
   $sth->execute(split(','));
}