Probleme mit GD

[Chris Weber]

Hallo,

ich versuche mich gerade in GD einzuarbeiten und habe das kleine einleitende Beispiel abgeschrieben, das man in der Doku zu GD findet.  Hier der Quelltext:

use GD;

create a new image

$im = new GD::Image(100,100);

allocate some colors

$white = $im->colorAllocate(255,255,255);
$black = $im->colorAllocate(0,0,0);      
$red = $im->colorAllocate(255,0,0);      
$blue = $im->colorAllocate(0,0,255);

make the background transparent and interlaced

$im->transparent($white);
$im->interlaced('true');

Put a black frame around the picture

$im->rectangle(0,0,99,99,$black);

Draw a blue oval

$im->arc(50,50,95,75,0,360,$blue);

And fill it with red

$im->fill(50,50,$red);

make sure we are writing to a binary stream

binmode STDOUT;

$gif_data = $im->gif;
open(OUT, ">test.gif");
print OUT $gif_data;
close(OUT);

Ich habe nur die letzten 4 Zeilen geändert so daß alles in eine Datei geschrieben und nicht auf der Kommandozeile ausgegeben wird.  So und jetzt zum Problem:  Die Datei "test.gif" kann von keinem Grafikprogramm geoeffnet werden !  Wenn ich das Bild in eine HTML-Seite einfüge wird es zwar angezeigt, jedoch verzerrt, d.h. mit vielen seltsagen roten Streifen drin.  Was soll das ?  Ich habe das ganze mit ActivePerl versucht und auch GD von ActiveState runtergeladen für den Fall das das relevant ist.

Danke
  Chris Weber