GD Bild einfügen

[Steff]

Hi!

kann jetzt endlich mit dem modul GD rumspielen und schon hänge ich wieder fest :-(
ich möchte ein bild als hintergrund haben, dazu benutze ich folgenden code:

#!/usr/bin/perl  
  
use strict;  
use GD;  
  
print "Content-type: image/jpeg\n\n";  
  
my $grafik = new GD::Image(574, 150);  
  
open (bild, "../privat/bg_c_test.jpg");  
my $rein = newFromJpeg GD::Image(\*bild);  
close (bild);  
  
$grafik->setTile($rein);  
  
binmode STDOUT;  
  
print $grafik->jpeg(100);

der pfad stimmt zu 100% jedoch wird nicht das bild angezeigt sondern nur schwarz. warum? was mach ich falsch?