Leser: 1
8 Einträge, 1 Seite |
1
2
3
4
5
6
7
8
9
use strict;
use CGI;
use Image::Magick;
print header("image/jpeg");
my $img = Image::Magick->new();
$img->Read("/home/files/test.jpg") && die "Fehler beim lesen";
$img->Write("jpeg:-");
print CGI::header("image/jpeg");
8 Einträge, 1 Seite |