Well
make your select more specific :

$dbi = DBI->connect('Blah', 'Blah', 'Blah', 'ODBC');
$sth = $dbi->prepare('select a, b, e, s from MyTable');
$sth->execute;
while (my ($a, $b, $c, $d) = $sth->fetchrow_array) {
 ....
}
[download]

So if you used named columns in the select statement it does not matter, in which order these columns are stored by your database. So there can be done any change (additional columns) to the table, and your script still works.

hope this helps

-----------------------------------
--the good, the bad and the physi--
-----------------------------------