my $sql = "SELECT * FROM whatever";
my $sth = $dbh->prepare($sql);
$sth->execute();
my $row;
my $save_it;

while (defined($row = $sth->fetchrow_hashref()))
{
    $save_it = {};
    %$save_it = %$row;

    # Need to save each hashed row ($save_it) now too ...
}