Use of uninitialized value in string eq at ... (gelöst) (Allgemeines zu Perl)

[thread]15320[/thread]

Use of uninitialized value in string eq at ... [gelöst]

Leser: 29

Articles: hide open all | hide show old branches

+4 replies
PETER_PAN2009

2010-07-28 09:50
User since
2009-08-24
111 Artikel
BenutzerIn
Hallo zusammen!

Diese Warning ("Use of uninitialized value in string eq at line 798") kriege ich einfach nicht weg.
Mit
Code: (dl )

1 2 3 4 5

unless ($rd_data eq q{}){ #line 798 #mache was }else{ print "Kein Inhalt...abbrechen\n"; }
Warum spuckt er die Warning aus, ich fange es doch ab! Gibt es da eine andere Möglichkeit?

Danke
Gruß
Peter
- +2 replies
- fw
  
  2010-07-28 10:05
  User since
  2010-07-04
  5 Artikel
  BenutzerIn
  Quote
  
  Code (perl): (dl )
  
  unless ($rd_data eq q{}){
  
  Code (perl): (dl )
  
  unless (defined $rd_data && $rd_data eq q{}){
  
  uninitialized heißt: Der Inhalt der Variablen ist undef.
  - renee
    
    2010-07-28 10:30
    User since
    2003-08-04
    14371 Artikel
    ModeratorIn
    
    undef ist aber auch "kein Inhalt", oder?
    
    Dann sollte es eher
    
    Code (perl): (dl )
    
    1 2 3 4 5 6
    
    if ( defined $rd_data && $rd_data ne '' ) { # mach was } else { print "Kein Inhalt...\n"; }
    
    sein
    Last edited: 2010-07-28 10:31:44 +0200 (CEST)
    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/
- GwenDragon
  
  2010-07-28 10:31
  User since
  2005-01-17
  14544 Artikel
  Admin1
  Undefininiert sprich Inhalt undef kommt öfters mal vor und sollte bei Vergleichen mit einer Prüfung durch defined abgefangen werden.
  
  Oder du schaltest ganz brutal die Warnungen dazu ab in einem Block, in der Funktion oder komplett. ;)
  
  Code (perl): (dl )
  
  no warnings 'uninitialized';
  
  die Drachin, Gwendolyn
  
  Unterschiedliche Perl-Versionen auf Windows (fast wie perlbrew) • Meine Perl-Artikel

View all threads created 2010-07-28 09:50.