while ( my @row = $sth->fetchrow() ) {
     $hash{$row[0]} = $row[1];
}