$has{$peer_address}->{times_connect}=$has{$peer_address}->{times_connect}+1;

##</code><code>##

$has{$peer_address}{times_connect}++;

##</code><code>##

$has{$peer_address}++;