Font
Wiki:Tipp zum Debugging: use Data::Dumper; local $Data::Dumper::Useqq = 1; print Dumper \@var;
[thread]5680[/thread]

Entweder / Oder Bedingung: Wie XOR

Readers: 2


<< |< 1 2 >| >> 14 entries, 2 pages
format_c
 2003-09-02 12:05
#82853 #82853
User since
2003-08-04
1706 articles
HausmeisterIn
[Homepage] [default_avatar]
Hi.
Ich wollte eine Bedingung machen mit einer XOR (^) BEdingung.

Dacht mir eigendlich folgendes:
Code (perl): (dl )
1
2
3
if ($string1 ^ $string2) {

}


aber irgendwie will das nicht so recht.
die alternative mit && und || sähe dann halt unschön aus.
Code (perl): (dl )
1
2
3
if ($string1 && !$string2 || !$string1 && $string2) {

}


Geht das nich doch irgendwie mit dem ^ Operator?
mache ich vielleicht was verkehrt?

Gruß Alex
Dubu
 2003-09-02 12:23
#82854 #82854
User since
2003-08-04
2145 articles
ModeratorIn + EditorIn

user image
Der ^-Operator macht ein bitweises XOR, kein logisches. Du braeuchtest einen '^^'-Operator, den Perl 5 aber nicht bietet. In Perl 6 wird es dafuer den Operator '~~' geben (und '~' wird das neue bitweise XOR). Bis dahin bleibt dir nur die Umschreibung.
Thorium
 2003-09-02 12:24
#82855 #82855
User since
2003-08-04
232 articles
BenutzerIn
[Homepage] [default_avatar]
Code (perl): (dl )
1
2
3
if ($string1 xor $string2) {

}


?
Per|li|nist der; -en, -en <zu ↑...ist>: a) Anhänger, Vertreter der radikalen Perlinisten die Perl als die einzig wahre Sprache ansehen; b) Mitglied einer perlinistischen Community.
Thorium
 2003-09-02 12:30
#82856 #82856
User since
2003-08-04
232 articles
BenutzerIn
[Homepage] [default_avatar]
achja die korrekte und kleinste boolsche schreibweise für das xor wäre:

Code (perl): (dl )
1
2
3
if ((!($string1 && $string2)) && ($string1 || $string2)) {

}
Per|li|nist der; -en, -en <zu ↑...ist>: a) Anhänger, Vertreter der radikalen Perlinisten die Perl als die einzig wahre Sprache ansehen; b) Mitglied einer perlinistischen Community.
havi
 2003-09-02 12:56
#82857 #82857
User since
2003-08-04
2036 articles
BenutzerIn
[Homepage]
user image
Es gibt doch den Befehl xor in Perl...
Dubu
 2003-09-02 13:04
#82858 #82858
User since
2003-08-04
2145 articles
ModeratorIn + EditorIn

user image
Autsch, den habe ich doch glatt vergessen... Ich sollte mir das Camelbook wohl mal wieder vornehmen. ;-)
*kopfschuettel*
Relais
 2003-09-02 13:05
#82859 #82859
User since
2003-08-06
2239 articles
ModeratorIn
[Homepage] [default_avatar]
[quote=havi,02.09.2003, 10:56]Es gibt doch den Befehl xor in Perl...[/quote]
in perlop.
Erst denken, dann posten -- Frankfurt.pm-Treffen am Dienstag 07.01.2020 im Café Diesseits
22. Deutscher Perl-Workshop 04. bis 06.03.2020 in Erlangen.
Frankfurt Perl-Workshop 2020-1 ca. Mai-Juni 2020 im Haus der Jugend

Winter is Coming
kabel
 2003-09-02 13:06
#82860 #82860
User since
2003-08-04
704 articles
BenutzerIn
[default_avatar]
havi ist in der gruppe "Awaiting Authorisation"? wie kann er dann posten?
-- stefan
format_c
 2003-09-02 13:12
#82861 #82861
User since
2003-08-04
1706 articles
HausmeisterIn
[Homepage] [default_avatar]
Ach danke.
xor wars natürlich.

Danke Euch allen.

Gruß Alex
Relais
 2003-09-02 13:12
#82862 #82862
User since
2003-08-06
2239 articles
ModeratorIn
[Homepage] [default_avatar]
[quote=kabel,02.09.2003, 11:06]havi ist in der gruppe "Awaiting Authorisation"? wie kann er dann posten?[/quote]
Hmm...

...was will Havi in der Gruppe "Awaiting Authorisation"?

...wieso ist er drin gelandet? Freiwillig?

...vielleicht hat er gepostet, als er eben noch normaler Moderator war?

Spukt es in diesem Forum? :ghostface:
Erst denken, dann posten -- Frankfurt.pm-Treffen am Dienstag 07.01.2020 im Café Diesseits
22. Deutscher Perl-Workshop 04. bis 06.03.2020 in Erlangen.
Frankfurt Perl-Workshop 2020-1 ca. Mai-Juni 2020 im Haus der Jugend

Winter is Coming
<< |< 1 2 >| >> 14 entries, 2 pages



View all threads created 2003-09-02 12:05.