Select Code to Download

if (my $hashref = $sth->fetchrow_hashref) {
    %info = %{$hashref};
} else {
    die "lname, username combo did not match any records";
}