Fehler (und Warnungen?) abfangen (gelöst) (Allgemeines zu Perl)

[thread]18713[/thread]

Fehler (und Warnungen?) abfangen [gelöst]

Tags: perl5 Ähnliche Threads

Leser: 17

Articles: hide open all | hide show old branches

+5 replies
Gast Der Namenlose

2013-10-29 15:11
Hallo, ich habe ein Skript geschrieben, dass Dateien überprüft und per Cron immer wieder angestoßen wird. Wenn die Bearbeitung durchläuft wird die bearbeitete Datei verschoben. Jetzt ist zum ersten Mal ein Fehler aufgetreten und dementsprechend sind die Dateien aus dem "in"-Ordner nicht mehr bearbeitet worden.

Quote
substr outside of string at test.pm line ...

Den Fehler habe ich jetzt behoben, indem ich vorm Verändern gegen die Länge prüfe.

Ich wüsste jetzt gerne wie man Fehler/Warnungen abfängt/überspringt, sodass weitere Dateien, die noch im Array stehen abgearbeitet werden können.

Zu eval habe ich schon ein bißchen was gelesen und probiert. Funktioniert aber nicht. Wie könnte man z.B. den Fehler hier abfangen, sodass er noch das print mitnimmt. Der Fehler hier steht stellvertretend für alle möglichen Fehler und Warnungen.
Code (perl): (dl )

1 2 3 4 5 6 7 8

use strict; use warnings; my $test = "test eins"; substr($test,12 ,2 , "xx"); print "Hallo";
Last edited: 2013-10-29 15:35:30 +0100 (CET)
- jan
  
  2013-10-29 15:36
  
  User since
  2003-08-04
  2536 Artikel
  ModeratorIn
  
  Prüf doch einfach mit length($string) vorher, ob der String überhaupt lang genug ist.
- +3 replies
- Muffi
  
  2013-10-29 15:39
  User since
  2012-07-18
  1465 Artikel
  BenutzerIn
  eval geht schon
  
  Code (perl): (dl )
  
  1 2 3 4 5
  
  my $test = "test eins"; eval { substr($test,12 ,2 , "xx"); }; print "Hallo";
  
  1 + 1 = 10
  - +2 replies
  - namenlose
    
    2013-10-30 08:53
    User since
    2013-10-30
    4 Artikel
    BenutzerIn
    
    Vielen Dank. Keine Ahnung, warum das gestern nicht geklappt hat ...
    
    Code (perl): (dl )
    
    1 2 3 4 5 6 7 8 9 10
    
    use strict; use warnings; my $test = "test eins"; eval { substr($test,1 ,2 , "xx"); }; print $@ if $@; print "Hallo";
    
    Bitte auf gelöst setzen.
    Last edited: 2013-10-30 08:59:58 +0100 (CET)
    - Muffi
      
      2013-10-30 09:12
      
      User since
      2012-07-18
      1465 Artikel
      BenutzerIn
      
      Man könnte sich noch fragen, ob man Fehler wirklich auf STDOUT haben will.
      1 + 1 = 10

View all threads created 2013-10-29 15:11.