Re: Binäre Daten in Perl

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