my @tables = (200, 201); for my $tab (@tables) { print <