Lo sé, pero igual en el PPM gráfico no me muestra el módulo que me dices...
Según miré sus configuraciones éste se conecta a la base y solicita los módulos según el
tipo de sistema desde el cual se haga la petición; y pues según lo que dices si el módulo
no corre en Windows pues por eso no lo muestra. Ya he mirado por muchos medios
y la única (probablemente) manera es controlar el navegador para que éste
mande las peticiones y lance los resultados al
script...
Esto ya lo logré hacer con
control remote y netcat para Windows. El problema que tengo ahora
es en lugar de utilizar netcat, utilizar el módulo Net::Telnet de Perl. Ya logré que envie la orden
de abrir una página X, pero no me muestra el resultado en el
script...
Intenté con waitfor(), y con cmd(), y ninguno. La conexión se cierra antes de que el
script reciba la respuesta del navegador.
He aquí lo que llevo en el paso de telnet...
- #!c:/perl/bin/perl.exe
-
-
- use Net::Telnet();
- $telnet = new Net::Telnet ( Timeout=>10, Errmode=>'die', Port=>23); #timeout en segundos
- $telnet->open('localhost');
- $telnet->print('window.location = "http://www.google.com.co/"');
- $telnet->waitfor('/\$ $/i');
- $telnet->print('orden');
- $output = $telnet->waitfor('/\$ $/i');
- print $output;
-
-
- ## envío del comando, mostrando la respuesta del navegador.
- # my @lines = $telnet->cmd("who\n");
- # print @lines or die "No se puede imprimir la salida";
- #($forecast) = $telnet->waitfor('/[ \t]+press return to continue/i');
- # print $forecast;
-
- exit()
Aquí están los dos métodos, por supuesto no los utilizo ambos al mismo tiempo
simplemente pongo como comentario el que no voy a utilizar pero ninguno de los dos
me sirve, me dice que el tiempo de espera se ha agotado según el
timeout que le
pongo pero nunca muestra la respuesta del navegador.
¿Tienen idea de por qué pasa esto?
2011-12-17 09:47 @449
me aparece lo mismo
