for ($3) {
	/transparent/ && $info{clear} == 1 && do {$use_this = 1; last;};
	/anonymous/ && $info{anonymous} == 1 && do {$use_this = 1; last;};
	/highanonymity/ && $info{spranonymous} == 1 && do  {$use_this = 1; last;};
}

##</code><code>##

Use of uninitialized value in pattern match (m//) at ./ProxyHunter.pl line 93.