Perl Prozess starten und Code über STDIN "reinschi - #51497 (Allgemeines zu Perl)

betterworld

2005-02-02 16:24

User since
2003-08-21
2614 Artikel
ModeratorIn

user image

Das mit dem _ _ END _ _ braucht man nicht... Wenn Du das folgende Programm nimmst, kannst Du jeweils die Eingabe mit Strg-D (oder Strg-Z, je nach Betriebssystem) beenden. Ausserdem gibt er die Fehlermeldung aus, die in $@ steht, wie Du auch mit perldoc -f eval haettest rausfinden koennen.

Code: (dl )

while (1){
local $/;
eval <>;
if ($@) {
  print "Das war ok!\n";
} else {
  print "Das gab einen Fehler:\n$@";
}
<>
}

Edit: Jetzt muesste es funktionieren\n\n

Lieblingsmodule: CPAN:

IPC::System::Simple, CPAN:

Path::Class