Stefan Falz: Fehler "script produced no output" bei Perl-Skripten im IIS4

Beitrag lesen

print "Content-type: text/plain\n\n";
print '@INC: ', join(' : ', @INC), "\n";
print "%ENV: \n";
print "$_:\t\t$ENV{$_}\n" for (sort keys %ENV);

Ich weiss von nichts. Pruefen, ob ein Modul installiert ist UND auch gefunden wird, kann man jedenfalls mit:

$have_module = eval { require LWP::Simple };
if ($have_module) {
  // all fine
} else {
  die("Can't find that fuckin' module!");
}

Hallo,

danke erstmal für die Antwort.
Ich habe beide Sachen ausprobiert.

#!/usr/bin/perl
print "Content-type: text/plain\n\n";
print '@INC: ', join(' : ', @INC), "\n";
print "%ENV: \n";
print "$_:\t\t$ENV{$_}\n" for (sort keys %ENV); --> Hier tritt der Fehler auf.

Wenn ich bei diesem Skript die letzte Zeile auskommentiere. läuft es durch,
ansonsten kommt der anfangs beschriebene Fehler.

$have_module = eval { require LWP::Simple };
if ($have_module) {

»»   // all fine

} else {

»»   die("Can't find that fuckin' module!");

}

Das hier bringt egal, was ich auch mache, immer den Fehler "Script produced no output"

Trotzdem danke, ich werde jetzt erstmal eine Antwort nach der anderen probieren.

Tschau, Stefan