my $affInfo = $dbh->do(
 'INSERT into teach_info (pickup,pmonth,pday,pyear) values (?,?,?,?)',
 undef,
 $pickup, $pmonth, $pday, $pyear);