Foro - Perl en Español

¿Cuál sería la forma correcta de descargarme una página web a través de un proxy utilizando Perl?

Esta es la única manera que me funcionó pero no me termina de convencer.



¿Cómo podría realizar lo mismo con sockets?

Gracias

Con LWP::UserAgent lo puedes hacer...

Bueno, ¡ja,ja,ja!, lo estoy intentando de verdad pero la pista que me diste se me quedó pequeña.

Estoy empezando con Perl y he puesto la pregunta en el nivel básico porque es el más bajo, me estoy leyendo manuales y dándole al buscador.

A ver, erv-Z

Con LWP::UserAgent lo puedes hacer

.

Después de darle al buscador no encontré nada con lo que sacar algo.

Pero vi un post que me dio por lo menos una manera de hacer algo nuevo.

continuar-una-descarga-pausada-t2229.html

Y le he dado caña para terminar sacando esto:


Esto para que veas mi nivel de Perl, ¡ja, ja!

Bien, pues en vez de avanzar, di un paso atrás, ya que no anonimizo la descarga.

Gracias por la respuesta a ver si puedes seguir echándome una mano. Un saludo.

Otra forma de hacerlo es así:



También puedes modificar el UserAgent para que sea una petición anónima, pero recuerda que si estás detrás de un proxy, quien hace la petición, al final, es el proxy.

Muy bueno, explorer, muchas gracias por la respuesta, funciona a la perfección: me da el anonimato que deseaba.

Sigo con mis preguntas.

¿Podría hacer lo mismo con un proxy SOCKS 5 con autenticación por usuario y contraseña?

No sé si se podrá hacer, intenté este método pero no va.

En este otro hilo hemos puesto las reglas básicas de conexión según el sistema operativo en que te encuentres.

Gracias de nuevo por la respuesta, explorer, pero parece que no es lo que necesito. Empezaré de nuevo dando mas datos:

Utilizo el ActivePerl; mi sistema operativo es XP.

Utilizo proxies anónimos publicados en la red de páginas como por ejemplo http://www.proxys.com.ar/
Después de testeados me quedo con los anónimos.

Cargo un proxy en el script que creaste. Y todo marcha a la perfección. El script me da anonimato.



Bien, ahora realizo lo mismo pero con socks proxies 4 5; busco una lista, la testeo, me quedo con los socks buenos, y los cargo en el script.



Y no funciona.

Me pasaste un link a una página, he leído toda la información pero parece que el tema va orientado a que yo haya construido un servidor socks en mi equipo, entonces tendría que configurar mi equipo para que aceptara esa conexión.

Lo que quiero es, de la misma forma que hice con el proxy, hacer con el socks.

Seguro que Salva te responde mejor que yo.

De momento, en este hilo de Perlmonks, alguien hace la misma cuestión, en relación a conectarse mediante SSH. Salva le indica que use Net::SSH::Perl y que la opción de SOCKS es fácil de implementar, lo cual hace más tarde en otro hilo.

Ya sé que no es SSH lo que pides, pero es la más cercano que he podido encontrar. Lo dicho: seguro que salva te dice algo más útil.

Lo más cercano que yo encontré es esto:



pero imposible instalar el módulo LWP::Protocol::socks en ActivePerl.

Probé de todo:

perl -MCPAN -e 'install LWP::Protocol::socks'

Intenté ppm.

Hasta cogí las carpetas y archivos e intenté meterlos manualmente con copiar y pegar, pero me tira un puñao de errores.

Parece lo más cercano a lo que quiero.

Le tienes en trouchelle.com.

Usa el PPM y añade trouchelle.com como repositorio y ya puedes instalarlo desde allí.

Si tienes dudas, mira mi guía de uso del PPM.