my %RESULTS  : shared;
.....

##</code><code>##

$RESULTS{"$ip"} = [];

##</code><code>##

Invalid value for shared scalar at jv.pl line 74.