Scan IP for open proxy?

Does anyone know a perl script (that i can use in my order system) that will scan an IP for an open proxy on the common ports?
I know many IRC networks do this when you connect.

 

 

 

 

Top