• Publicidad

Obtener código de página PHP

Todo lo relacionado con el desarrollo Web con Perl: desde CGI hasta Mojolicious

Obtener código de página PHP

Notapor jimr1984 » 2015-06-13 22:54 @996

Saludos a todos.

En esta ocasión tengo un problema para obtener el código que muestra una página.

Al llamar por GET a http://websms.nuevatel.com/new_img.php este me genera un token aleatorio, pero no puedo extraerlo.

Mi código:
Sintáxis: [ Descargar ] [ Ocultar ]
  1. #!/usr/bin/perl -l 
  2.  
  3. use strict; 
  4. use warnings; 
  5.  
  6. use LWP::UserAgent; 
  7. use HTTP::Cookies; 
  8. use HTTP::Request; 
  9. my $http = LWP::UserAgent->new(); 
  10. $http->cookie_jar($cookies); 
  11. $http->timeout(20); 
  12. $http->agent("Mozilla/4.0 (compatible; MSIE 5.0; Windows 98; DigExt)"); 
  13. my $u = "http://websms.nuevatel.com/new_img.php"; 
  14. my $p = $http->get($u); 
  15. my $x = $p->content(); 
  16. print $x; 

¿Cómo puedo capturar el código que me genera el enlace new_img.php?
jimr1984
Perlero nuevo
Perlero nuevo
 
Mensajes: 123
Registrado: 2012-11-25 07:11 @341

Publicidad

Re: Obtener código de página PHP

Notapor explorer » 2015-06-13 23:24 @016

¿Con una expresión regular?
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14480
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España

Re: Obtener código de página PHP

Notapor jimr1984 » 2015-06-13 23:28 @019

En cada petición GET http://websms.nuevatel.com/new_img.php , el código que muestra es DIFERENTE,
por lo que NO sé si con una expresión regular serviría.

Debería simplemente funcionar mostrando el content(), ¿cierto?

Pero NO muestra nada.

¿Algún código de ejemplo?
jimr1984
Perlero nuevo
Perlero nuevo
 
Mensajes: 123
Registrado: 2012-11-25 07:11 @341

Re: Obtener código de página PHP

Notapor explorer » 2015-06-14 04:52 @245

Si hago un GET http://websms.nuevatel.com/new_img.php , a mi siempre me devuelve lo mismo, un '0'.
Sintáxis: [ Descargar ] [ Ocultar ]
Using bash Syntax Highlighting
explorer@Arcanus:~/bin > GET http://websms.nuevatel.com/new_img.php
0
Coloreado en 0.005 segundos, usando GeSHi 1.0.8.4
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14480
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España

Re: Obtener código de página PHP

Notapor jimr1984 » 2015-06-16 12:55 @579

Ya me funcionó, gracias...

my $uxa = "http://websms.nuevatel.com/new_img.php";
my $pxa = $http->get($uxa);
my $xxa = $pxa->content();
print "Content-type: text/html\n\n";
print $xxa;
jimr1984
Perlero nuevo
Perlero nuevo
 
Mensajes: 123
Registrado: 2012-11-25 07:11 @341

Re: Obtener código de página PHP

Notapor explorer » 2015-06-16 13:55 @622

O sea... que nos faltaba por saber que la salida no era a consola, sino hacia una página web :(
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14480
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España

Re: Obtener código de página PHP

Notapor jimr1984 » 2015-06-29 10:17 @470

ok, explorer, muchas gracias.
jimr1984
Perlero nuevo
Perlero nuevo
 
Mensajes: 123
Registrado: 2012-11-25 07:11 @341


Volver a Web

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 4 invitados

cron