Programm starten über exec (Allgemeines zu Perl)

[thread]16259[/thread]

Programm starten über exec

Tags: perl5 Ähnliche Threads

Leser: 20

Articles: hide open all | hide show old branches

+5 replies
Kean

2011-05-09 10:54
User since
2004-08-18
463 Artikel
BenutzerIn
Ich versuche gerade eine Update Funktion zu schreiben für ein Script. Dieses entpackt die neue Programmversion und überschreibt das alte Script.

Da das Überschreiben nicht funktioniert solange das Script ausgeführt wird, habe ich die Update Funktion in ein eigenes Script gepackt welches ich mit dem Befehl exec starte.

Soweit funktioniert das ganze auch sehr gut. Was mich aber stört ist die Ausgabe des folgenden Hinweis bei jedem Start:
Code: (dl )

1 2

Statement unlikely to be reached at C:\Users\Tester\Desktop\test.pl line 201. (Maybe you meant system() when you said exec()?)
Kann ich diese irgendwie ausschalten? Oder gibt es eine "saubere" Möglichkeit ein zweites script zu starten und das erste zu beenden ohne dass das zweite mit beendet wird?
- +4 replies
- MatthiasW
  
  2011-05-09 11:05
  User since
  2008-01-27
  367 Artikel
  BenutzerIn
  Die Meldung erscheint, weil nach dem exec() noch mindestens eine Anweisung steht:
  
  Code (perl): (dl )
  
  1 2 3 4 5 6 7 8
  
  #!/usr/bin/perl use strict; use warnings; exec('...'); print "Ende.\n";
  
  Das print() kann ~~nicht~~ nur im Fehlerfall erreicht werden.
  Um die Meldung zu vermeiden, musst du dafür sorgen, dass auf exec() nicht direkt Anweisungen folgen, also bspw. ein Block drumherum, wie auch in perlfunc (http://p3rl.org/exec) erwähnt: { exec('foo') }
  
  MfG
  
  edit: ~~nicht~~ nur im Fehlerfall
  Last edited: 2011-05-09 11:09:54 +0200 (CEST)
  perl -E'*==*",s;;%ENV=~m,..$,,$&+42;e,$==f;$"++for+ab..an;@"=qw,u t,,print+chr;sub f{split}say"@{=} me"'
  - +3 replies
  - Kean
    
    2011-05-09 11:13
    
    User since
    2004-08-18
    463 Artikel
    BenutzerIn
    
    Stimmt ich hatte nach dem exec noch ein exit, welches ich ja garnicht benötige, da der Prozess ja sowieso beendet wird.
    
    Danke.
    - +2 replies
    - MatthiasW
      
      2011-05-09 12:30
      
      User since
      2008-01-27
      367 Artikel
      BenutzerIn
      
      Nunja, bei einem exit() sollte die Meldung eigentlich nicht erscheinen. Außerdem kann es durchaus passieren, dass exec() fehlschlägt, man sollte also darauf achten, wie man auf den Fehlerfall reagiert.
      
      MfG
      perl -E'*==*",s;;%ENV=~m,..$,,$&+42;e,$==f;$"++for+ab..an;@"=qw,u t,,print+chr;sub f{split}say"@{=} me"'
      - Kean
        
        2011-05-09 12:34
        
        User since
        2004-08-18
        463 Artikel
        BenutzerIn
        
        Hab es gerade nochmal ausprobiert und es kommt mit exit die Fehlermeldung und ohne nicht mehr...
        
        Sollte das exec nicht ausgeführt ist dies aber auch nicht kritisch.

View all threads created 2011-05-09 10:54.