foreach (@list) {
  $conn-do("insert into foo values($_)") || die;
}