nicht angemeldet
hallo zusammen....
ich moechte aus dem perl-script gerade ein file an den broswer schicken damit der user es direkt mit "save as" downloaden kann.
wie mach ich das ...???
luke
vielleicht meinst diu sowas:
wichtig ist , dasz vorher nicht, wie auch immer, ein HTTP-Header geschriben wird (via CGI.pm oder gleich direkt).
weil die Zeile
print "Content-Type: mime/type\n\n";
dies macht.
(Datei kann irgendwo im File-System und musz nicht unbedingt direkt im Webserver-Bereich sein).
#!/usr/bin/perl
use CGI;
my $query= new CGI;
print $query->header('mime/type'); # den mimetype der datei angeben, je nach Dateityp
open(IN, "$filename");
binmode(IN); # immer gut, wenns unter Win32 passiert und eine Binaer-Datei ist
print while <IN>;
close IN;
oder auch anders als Umleitung auf den neuen URL
(Datei musz ueber den Web-Server erreichbar sein)
#!/usr/bin/perl
use CGI;
my $query= new CGI;
print $query->header(-Refrsh=>"0; URL=$url_zur_datei");
Gruß
klaus