Depending on how is is going to be used, it may not be necessary to build deeply nested hashes, as a composite key can often render the same service and make things easier.

For example,

$HONEY{$ip}{$port}{$status}{$user_pass} +=1;
[download]

might be replaced by:

$HONEY{"$ip;$port;$status;$user_pass"} ++;
[download]

but it really depends on how it's gonna be used.