while ($user_hashref = $sth->fetchrow_hashref) {
     print "name = $user_hashref->{username}\n";
     print "email = $user_hashref->{email}\n";
  }