 Lun Oct 02, 2006 1:34 pm
|
 |
malmada
Perlero Nuevo
|
Registrado: 02 Oct 2006
Mensajes: 3
|
|
| Consulta a un server |
 |
|
Necesitaría saber si alguien conoce la forma de realizar una consulta a un server Web, y el resultado de esa consulta sea un archivo.jpg para mostra en una página en HTML.
Desde ya Muchas Gracias |
|
|
|
|
Lun Oct 02, 2006 3:13 pm
|
|
explorer
Moderador
|
Registrado: 24 Jul 2005
Mensajes: 4035
Ubicación: Valladolid, España
|
|
|
|
|
| Con el paquete lwp es muy fácil obtener la petición web. El resultado en forma de jpeg lo puedes crear con el módulo GD y luego sacarlo todo con el módulo CGI. |
|
|
Lun Oct 02, 2006 4:37 pm
|
|
kidd
Creador de Perl en Español
|
Registrado: 15 Oct 2003
Mensajes: 1366
Ubicación: México
|
|
|
|
|
Hola:
Es realmente muy sencillo. Por ejemplo podrías hacer un script de la siguiente manera:
| Perl: | #!/usr/bin/perl -w
use strict;
use CGI;
my $query = new CGI;
my %Input = $query-> Vars;
my $DIR = '/dir/a/imagenes';
if($Input{img } && -e "$DIR/$Input{img}.jpg"){
print "Content-type: image/jpeg\n\n";
open my $IMG, '<', "$DIR/$Input{img}.jpg" or die("No se encontró la imagen: $!");
binmode($IMG);
print do { local $/; < $IMG> };
close $IMG;
}
exit(1); |
Y después en tu HTML llamar a tu script así:
| HTML: | <img src="imagen.cgi?img=Perfil">
<img src="imagen.cgi?img=Imagen1"> |
El script recibe el nombre de la imagen, lo busca en el directorio que le hayas puesto y la despliega. Esto es útil por ejemplo, si quieres sacar tus imagenes de un directorio privado, o quizá ponerle un contador.
Saludos |
|
Powered by phpBB © 2001, 2005 phpBB Group
|
