Datei über Link öffnen

[Jackie]

Hallo!

Wie kann ich mit Perl eine Datei (über einen Link) öffnen, die erst bei Aufruf des Links generiert werden soll. Die Datei soll nämlich nicht irgendwo auf dem Server oder Rechner abgelegt werden, ist also quasi nur temporär vorhanden.

Gruss Jackie

[rolfrost]

Mahlzeit

Wie kann ich mit Perl eine Datei (über einen Link) öffnen, die erst bei Aufruf des Links generiert werden soll. Die Datei soll nämlich nicht irgendwo auf dem Server oder Rechner abgelegt werden, ist also quasi nur temporär vorhanden.

use CGI 'param';
print header;

if(param){
 if(param('klick')){ &machwas }
}
else{
 print qq(<a href="script?klick=1"> Datei anlegen </a>);
}

sub machwas{
 open OUT, $file or ff("fehler");
 print OUT "$contents";
 close OUT;
 print $contents;
}

sub ff{ print $_[0]; exit }

Und wo ist das Problem ?

Viele Grüße, Rolf

[rolfrost]

ich Dussel...

sub machwas{
 open OUT, $file or ff("fehler");

open OUT, ">$file" or ff("fehler");

Gruß, rolf