well... try

while(my $row = $sth->fetchrow_hashref() && my %row = %$row)
[download]

or something similar. Copy the row hash.

                - Ant
                - Some of my best work - (1 2 3)