Undefinierten Wert "vergleichen" (Allgemeines zu Perl)

Brenner

2009-01-21 16:35

User since
2009-01-13
87 Artikel
BenutzerIn
[default_avatar]

Programm geht soweit, aber es werden Warnungen geworfen (use strict, use warnings).

Per if Abfrage vergleiche ich eine Variable mit einem vorgegeben Wert. SOweit alles ok. Da einzige was ich nicht ohne Warnungen abgefangen bekommen ist, wenn der Wert undefiniert ist.

Die Schleife wird trotzdem abgearbeitet, aber die Meldung "Use of un intitialized value in string...".

Gast Gast

2009-01-21 16:56

Code (perl): (dl )

my $var=undef;
if(defined($var) && $var==1)
{
  # tu was ...
}
elsif(!defined($var))
{
  # variable nicht definiiert
}
else
{
  # variable != 1
}

Linuxer

2009-01-21 17:00

User since
2006-01-27
3875 Artikel
HausmeisterIn

user image

Oder, um ein defined() zu sparen:

Code: (dl )

if ( !defined $var ) {
 ## nicht definiert
}
elsif ( $var eq 'string' ) {
 ## string vergleich erfolgreich
}
else {
 ## alle anderen fälle
}

meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!

GwenDragon

2009-01-21 17:01

User since
2005-01-17
14563 Artikel
Admin1

Ich bevorzuge das mit weniger Tipperei:

Code: (dl )

if (!defined ($var)) {
# tue dies, wenn nicht definiert
}
elsif ($var == 1) {
# tue das wenn 1
}
else {
# tue sonstwas
}

die Drachin, Gwendolyn

Unterschiedliche Perl-Versionen auf Windows (fast wie perlbrew) • Meine Perl-Artikel

Struppi

2009-01-21 18:05

User since
2006-02-17
628 Artikel
BenutzerIn

oder:

Code (perl): (dl )

unless (defined ($var)) {
# tue dies, wenn nicht definiert
}
elsif ($var == 1) {
# tue das wenn 1
}
else {
# tue sonstwas
}

Crian

2009-01-26 17:49

User since
2003-08-04
5866 Artikel
ModeratorIn

Nein nein nein, unless nicht mit elsif kombinieren. Im sinne der Wartbarkeit ist das schlechter Stil.

s--Pevna-;s.([a-z]).chr((ord($1)-84)%26+97).gee; s^([A-Z])^chr((ord($1)-52)%26+65)^gee;print;

use strict; use warnings; Link zu meiner Perlseite

Struppi

2009-01-26 18:23

User since
2006-02-17
628 Artikel
BenutzerIn

hehe, mich hat überhaupt gewundert das das geht, es scheint ein etwas neueres Feature zu sein.
Ich gebe zu, das war ein Reflex. Wenn ich

Code: (dl )

if(!...

sehe, denke ich an alte Newsgroup Zeiten wo immer auf unless statt if not hingewiesen wurde. Aber ich gebe dir recht, dass unless { ... } elsif verwirren kann.

renee

2009-01-26 19:07