while ( my $result = $sth->fetchrow_hashref() )