("string" ne "string") = (true && false): StringCompare mit eq/ne... - #54299 (Allgemeines zu Perl)

Crian

2005-04-28 14:27

User since
2003-08-04
5866 Artikel
ModeratorIn

Code: (dl )

1
2
3

...>perl -e "print +('foo' ne 'foo' ? 'ungleich' : 'gleich'), ' ', ('foo' eq 'foo' ? 'gleich' :
 'ungleich')"
gleich gleich

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