22 May
2004
22 May
'04
08:52
Am Samstag, 22. Mai 2004 10:30 schrieb Stefan Lang:
In C (und C++) kann man z.B. einfach schreiben:
char c = 'A'; c += 10; printf("%c", c);
Gibt es eine ähnliche Möglichkeit für Perl, folgendes funktioniert nicht so ganz:
use bytes;
my $c = 'A'; $c += 10; # mit use warnings gibt diese Zeile eine Warnung print $c;
Dazu ist Perl zu intelligent, ich weiss nicht ob es der beste Weg ist, aber $c = chr( ord( $c ) + 10 ); sollte funktionieren. -- Andreas