my @a = $results{$addr}; #### my @a = @{$result{$addr}};