Cheatah: Wie kann ich eine Datei auf einem anderen Server öffnen?

Beitrag lesen

Hi,

$form{'file'} ist die datei(HTML) oeffnen willst.

vermutlich eher param('file'), siehe

perldoc CGI

$FILE = "$FORM{'file'}";

Wozu diese Zuweisung? Und wenn, dann bitte

my $file = $form{'file'}; # bzw. my $file = param('file');

(Kleine Variablennamen, lexikalische Variablen (my), _keine_ Anführungszeichen, und vorher hattest Du %file, nicht %FILE.)

$url = "$FILE";

Wozu dies nun bitte schon wieder? Erstens my $url = $file (wieder lexikalisch und _ohne_ Anführungszeichen), zweitens weist Du hier zwei unterschiedlichen Variablen einen Wert zu, den Du ohnehin schon in Reinform hast.

use LWP::Simple;
$string = get($url);

Bitte wieder lexikalisch. Letztlich bleiben folgende Zeilen über:

use CGI ':standard';
use LWP::Simple;
my $string = get(param('file));

Cheatah