Opened by Gast at 2008-12-07 19:08
Hallo,
ich habe in einer Variable einen Zeichenstrom, in dem Daten zu Blöcken zu 8 Zeichen gespeichert sind.
Nun möchte ich diesen Zeichenstrom erstmal in Blöcke trennen.
gibt mir auch folgendes aus:
anzahl 2
test: abcdefgh
test: jklmnopq
test: rstuvwxy
Nun interessiert mich aber das Zeichen (bzw. der Wert) an Position x in diesem Block. Darum habe ich das versucht in ein array mit unsignde char zu zerlegen, was aber nicht funktioniert. Also ich schreibe einfach:
dann wird mir $str aber in 24 Blöcke zerlegt. Aber warum?
Gruß
Thomas
ich habe in einer Variable einen Zeichenstrom, in dem Daten zu Blöcken zu 8 Zeichen gespeichert sind.
Nun möchte ich diesen Zeichenstrom erstmal in Blöcke trennen.
Code (perl): (dl
)
1 2 3 4 5 6
my $str = "abcdefghjklmnopqrstuvwxy"; my @test = unpack("a8" x (length($str) / 8) , $str); print "anzahl " . $#test . "\n"; foreach (@test) { print "test: $_\n"; }
gibt mir auch folgendes aus:
anzahl 2
test: abcdefgh
test: jklmnopq
test: rstuvwxy
Nun interessiert mich aber das Zeichen (bzw. der Wert) an Position x in diesem Block. Darum habe ich das versucht in ein array mit unsignde char zu zerlegen, was aber nicht funktioniert. Also ich schreibe einfach:
Code (perl): (dl
)
my @test = unpack("c8" x (length($str) / 8) , $str);
dann wird mir $str aber in 24 Blöcke zerlegt. Aber warum?
Gruß
Thomas