And in addition to this: why did he post while (my @row = $sth->fetchrow_array), in which he asks about "a way of improving the efficiency of this bit of code" where the code is basically the same as here, if it "doesn't work" anyway? Mistery!!