Zweifache Grafikausgabe

[Nadine]

Hallo Leute,

ich hab das unten angezeigtes Unterprogramm Zeige_bild:

sub Zeige_bild
{
  $file = $_[0];
  $teilbildgroesse = 1024;    
  open(BILD, $file);  
  binmode(BILD);
  binmode(STDOUT);    
  while(read(BILD, $teilbild, $teilbildgroesse))
  { print $teilbild;
    }
  close(BILD);
}

Nun versuche ich mit den folgenden Aufrufe von Zeige_bild
zwei Bilder nebeneinander auf der Seite zu zeigen.

print  "Content-type: image/jpeg\n\n";

&Zeige_bild('bild_1.jpg');
&Zeige_bild('bild_2.jpg');

Doch ich bekomm nur das bild_1.jpg zu sehen, ich will aber beide darstellen.
Wie macht man das, ohne das man externe Module wie GD.pm benutzn muß!
Oder geht das gar nicht mit dem Unterprogramm Zeige_bild.

Danke, Danke!!!
Gruß Nadine