push @{$results{$addr}},[@output]; #### my @a = $results{$addr};