Cómo utilizar un túnel LWP agente de usuario

LWP :: agente de usuario es un módulo Perl que le permite crear secuencias de comandos que intentan conectarse a un host remoto mediante el uso de un agente de usuario específico. Una de las características de LWP :: agente de usuario es su capacidad para manejar los túneles, que son conexiones iniciadas a través de un servidor proxy. Se puede utilizar un túnel para conectar a un sitio remoto con LWP :: agente de usuario editando el código fuente de la secuencia de comandos.

Instrucciones

1 Abrir el código fuente de la secuencia de comandos LWP :: Perl agente de usuario en un editor dedicado o en un editor de textos estándar como Bloc de notas.

2 Introduzca el siguiente fragmento de código al código fuente de la aplicación, antes de que el programa intenta iniciar cualquier conexión:

mi delegación $ = Net :: proxy-> nueva (

{ in => {
type => 'tcp',
port => $port,
host => $CONF{'local-only'} ? 'localhost' : '0.0.0.0',
},
out => {
type => 'connect',
host => $outhost,
port => $outport,
proxy_host => $proxyhost,
proxy_port => $proxyport,
proxy_agent => $CONF{'user-agent'},
@{ $CONF{'proxy-authentication'} },
},
}
);

$ Proxy-> registrar ();

3 Reemplazar "outhost" con el nombre de host del servidor el script debe conectarse y "puerto de salida", con su número de puerto. Editar "Host Proxy" y "proxyport" mediante la sustitución de ellos, respectivamente, con el nombre de host y el número de puerto del proxy.

4 Guarde el archivo. Ahora puede utilizar el "$ proxy" variable para iniciar una conexión con el sitio remoto.