GIF und Perl

[Cheatah]

Hi,

inzwischen bin ich ja mit den Grundlagen von GIF vertraut... aber die Ausgabe via Perl klappt leider nicht! Das Script sieht so aus:

$gif = "GIF87a";
$gif .= hex("01").hex("40").hex("00").hex("F0");
$gif .= hex("F7").hex("00").hex("00");
for ($i=255; $i>=0; $i--) { $gif .= hex("FF").hex($i).hex($i); }
$gif .= hex("2C").hex("00").hex("00").hex("00").hex("00").hex("01").hex("40").hex("00").hex("F0");
$gif .= hex("00");
for ($y=0; $y<=239; $y++) {
   for ($x=0; $x<=319; $x++) {
      $gif .= hex($y);
   }
}
$gif .= hex("3B");

binmode STDOUT;
print "$gif";

Die meisten Angaben sind dabei Header u.ä. Die erste for-Schleife erstellt eine Farbpalette, die beiden geschachtelten sind für die Pixel da (so scheint das jedenfalls aufgebaut zu sein). Laut perl -c ist die Syntax OK. chmod 755 ist natürlich gesetzt, trotzdem kommt ein Internal Server Error. Kann mir irgendwer verraten, warum...?

Merci,

Cheatah