Welchen Operator muss ich benutzen? - #129630 (Allgemeines zu Perl)

Gast wer

2009-12-23 16:13

wenn es genau so da stehen muss würde ich es so scheiben

Code (perl): (dl )

print $mesg->count . " entries found\n" and exit unless $mesg->count;

wenn man sowas

Code (perl): (dl )

print $mesg->count . " entries found\n"  ,exit unless $mesg->count;

oder sowas

Code (perl): (dl )

print $mesg->count . " entries found\n" . exit unless $mesg->count;

schreibt, macht es aber etwas klein wenig anderes.
Du wirkst kein Ausgabe bekommen, das Programm wird sich aber beenden.

"." verknüpft Strings, es wird also versucht den Rückgabewert von exit mit dem davor stehen String zu verbinden, da exit aber schon ausgeführt wurde, kann die Verknüpfung nicht mehr stattfinden und print wird nicht ausgeführt.
"," dient dazu Listen zu erzeugen. An jede Funktion kann man Listen übergeben. print verarbeitet Listen indem es diese nacheinander ausgibt.

Code (perl): (dl )

print 1,2,3

ist also identisch mit

Code (perl): (dl )

print 1 and print 2 and print 3

Für das Beispiel beutet es dass versucht wird nacheinander der string und der Rückgabewert von exit aus zu geben. Wozu es nicht kommt da exit ja schon ausgeführt wurde.

Vernünftiger weise sollte man das nicht so schreiben. Neben den Beispielen oben könnte man auch schreiben:

Code (perl): (dl )

if not $mesg->count
{
  print $mesg->count . " entries found\n";
  exit;
}

unless und "if not", oder "if !", machen das selbe.