for (@table_names) {
  my ($mark) = $dbh->selectrow_array("select Mark from $_ where id = $
+id");
}
[download]

update: check out DBI

Problem with MERGE tables is they rely on the underlying tables being identical. As I understand it only the first four columns in these tables are identical so MERGE tables will be of no use.

Hope that helps
UnderMine

If ID and MARK are similar across all the tables, UNION is probably the way to go.

SELECT ID, MARK FROM Table 1
UNION 
SELECT ID, MARK FROM Table 2
...
[download]

tobin

It may be long, it may be boring, but its essential reading if you want to use perl to manipulate a database, try perldoc DBI. You'll need it if you are going to get that valid database handle ($dbh) necessary to use the sample code above.

-- Hugh

The initial SQL would look like this :-

SELECT table_name FROM INFORMATION_SCHEMA.TABLES
WHERE table_schema = 'db_name'
[download]

The second dynamic SQL statement would look like :-

$sql = join ' UNION ', map "SELECT ID, Name, Class, Mark, $_  table_na
+me from $_", @tables;
[download]