$bild = $image[$x];
$quellbild = GD::Image->newFromJpeg($bild) or die "Konnte kein Objekt erzeugen";
($breite, $hoehe) = $quellbild->getBounds();
print "Breite: " . $breite;