fehlersuche in verbindung mit packet (Allgemeines zu Perl)

[thread]14553[/thread]

fehlersuche in verbindung mit packet

Leser: 22

Articles: hide open all | hide show old branches

+9 replies
jan999

2010-01-28 10:39

User since
2009-04-02
109 Artikel
BenutzerIn

Moin !

ich habe ein umfangreiches tool das immer auf ein pm zugreift und dort kommt in einer funktion irgendwie kein wert an.

diese funktion wird von vielen stellen aus aufgerufen und dann kommt es zu einer fehlermeldung.

gibt es die möglichkeit in einer funktion zu ermitteln von wo diese gerade aufgerufen wurde oder eine andere effektive möglichkeit des debuggens?

gruß Jan :-)
- +4 replies
- bianca
  
  2010-01-28 10:42
  
  User since
  2009-09-13
  7016 Artikel
  BenutzerIn
  
  Sag uns doch mal die Fehlermeldung.
  10 print "Hallo"
  20 goto 10
  - +3 replies
  - jan999
    
    2010-01-28 10:53
    User since
    2009-04-02
    109 Artikel
    BenutzerIn
    
    Hi !
    
    Quote
    *Use of uninitialized value $value in concatenation (.) or string at C:/Perl/lib
    /OSM/osm.pm line 1173.
    *Use of uninitialized value $value in concatenation (.) or string at C:/Perl/lib
    /OSM/osm.pm line 1173.
    
    hier ist der zugehörige code:
    
    Code: (dl )
    
    1 2 3 4 5
    
    sub printHTMLCellLeft { my ($file) = shift ; my ($value) = shift ; print $file "<td align=\"left\">" . $value . "</td>\n" ; #<<- 1173 }
    
    gruß Jan :-)
    - bianca
      
      2010-01-28 11:04
      
      User since
      2009-09-13
      7016 Artikel
      BenutzerIn
      
      Hast Du denn in Folge weitere Fehlfunktionen oder sind die beiden Variablen garnicht Pflicht?
      Falls nicht Pflicht würde ich einfach
      
      Code (perl): (dl )
      
      1 2
      
      my ($file) = (defined $_[0] ? $_[0] : ''); my ($value) = (defined $_[1] ? $_[1] : '');
      
      machen. Das wäre dann quasi die Unterdrückung-der-Fehlermeldung-Lösung.
      
      Falls doch Pflichtfeld, muss das doch im Programmablauf über die Fehlermeldung hinaus auffallen. Es kann doch dann entweder die Datei nicht bearbeiten oder die Value nicht bekommen.
      Sprich, in der Oberfläche muss doch rein funktionell erkennbar sein, dass es nicht tut, was es soll. Bringt das keine Hinweise?
      Last edited: 2010-01-28 11:06:57 +0100 (CET)
      10 print "Hallo"
      20 goto 10
    - topeg
      
      2010-01-28 15:19
      
      User since
      2006-07-10
      2611 Artikel
      BenutzerIn
      
      Bei HTML-Tabellen würde ich bei leeren Feldern ein   einfügen manche Browser (IE) optimieren das unter Umständen vor dem Rendern weg und das kann das Layout durcheinander werfen.
      
      Code (perl): (dl )
      
      1 2
      
      $value=' ' if(!defined($value) || $value eq ''); OSM::osm::printHTMLCellLeft($filehandle,$value);
- +4 replies
- renee
  
  2010-01-28 11:09
  User since
  2003-08-04
  14371 Artikel
  ModeratorIn
  Mit caller kommst Du an die Infos, von wo aus die Funktion aufgerufen wurde...
  
  Code (perl): (dl )
  
  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19
  
  #/usr/bin/perl use strict; use warnings; test(); sub test { my @caller_info = caller(); print "test caller 0: @caller_info\n"; # siehe auch perldoc -f caller test2(); } sub test2 { my @caller_info = caller(); print "test caller 0: @caller_info\n"; my @caller_info_1 = caller(1); print "test caller 1: @caller_info_1\n"; }
  
  OTRS-Erweiterungen (http://feature-addons.de/)
  Frankfurt Perlmongers (http://frankfurt.pm/)
  --
  
  Unterlagen OTRS-Workshop 2012: http://otrs.perl-services.de/workshop.html
  Perl-Entwicklung: http://perl-services.de/
  - +3 replies
  - bianca
    
    2010-01-31 17:22
    
    User since
    2009-09-13
    7016 Artikel
    BenutzerIn
    
    Kann man Perl auch so konfigurieren, dass bei einer Fehlermeldung innerhalb einer sub{} immer ein caller() ausgeführt und mit ins error.log geschrieben wird?
    10 print "Hallo"
    20 goto 10
    - +2 replies
    - sid burn
      
      2010-01-31 17:49
      
      User since
      2006-03-29
      1520 Artikel
      BenutzerIn
      
      Im Modul "Carp" findest du einige Funktionen wo du Fehlermelung vom aufrufer angeben kannst, auch StackTraces ausgeben kannst. Allerdiengs musst du dann anstatt die() die aufrufe durch "croak" etc. ersetzten.
      
      Ansonsten kannst du auch noch Devel::StackTrace nutzen. Das lädst du einfach und jedes die() warn() gibt dann einen StackTrace aus.
      
      Allerdiengs ist das wirklich global, und wie der Name vorangeht mit "Devel::" sollte man das nur aktivieren wenn man Entwickelt.
      Nicht mehr aktiv. Bei Kontakt: ICQ: 404181669 E-Mail: perl@david-raab.de
      - bianca
        
        2010-01-31 19:09
        
        User since
        2009-09-13
        7016 Artikel
        BenutzerIn
        
        Ist mir für den Produktivbetrieb dann doch zuviel, wie Du ja auch schon drauf hingewiesen hattest.
        Danke Dir trotzdem vielmals, gut zu wissen, was es da gibt. Hab es mir abonniert.
        10 print "Hallo"
        20 goto 10

View all threads created 2010-01-28 10:39.