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:-");