Select Code to Download

my %hash = map { 
                    join(':', $_->{Computer}, 
...
                              $_->{Status} 
                    ) => $_ 
                } @{GetQueryTable('all_records_for_report', 138)};

my %hash;
for ( @{GetQueryTable('all_records_for_report', 137)} ) {
...
            . ($_->{Product}||"") 
            . ":$_->{Status}"} = $_;
}