eigentlich sollte man in Perl
if ($NextCOMMAND eq "Write")
oder alternativ
if ($NextCOMMAND == "Write")
codieren können. "==" hat bisher immer funktioniert, aber im obigen Beispiel habe ich
nein, sollte man nicht, das eine ist ein Stringvergleich, dass andere ein Zahlenvergleich.
Du programmierst ohne Warnungen (vermutlich auch ohne use strict), das ist nicht empfehlenswert, da die beiden Hilfsmittel, dir viel bei der Fehlersuche helfen können.
Zur Verdeutlichung:
#! /usr/bin/perl -w
my $x = "a";
my $y = "A";
print $x == $y ? 'gleich' : 'ungleich';
print "\n";
print $x eq $y ? 'gleich' : 'ungleich';
codiert, dann hat es funktionier. Kann mir dieses Phänomän jemand erklären?
Der Zahlenvergleich wandelt den String vermutlich in eine Zahl um
Struppi.
--
Javascript ist toll (Perl auch!)
Javascript ist toll (Perl auch!)