Opened by Damokles at 2005-07-07 01:54
User since
2005-06-28
7 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2005-06-28
7 Artikel
BenutzerIn
Erst mal danke für die Antwort.
Könnte man das noch in einen einzigen unpack Aufruf packen, oder wäre das zu umständlich.
Kann man Perl dazu bringen mit hier mit 2dimensionalen Arrays zu arbeiten. Was ich meine er füllt das Array auf wie oben angegeben und wenn es voll ist fängt er von vorne an. Hoffentlich war das verständlich.
Könnte man das noch in einen einzigen unpack Aufruf packen, oder wäre das zu umständlich.
Kann man Perl dazu bringen mit hier mit 2dimensionalen Arrays zu arbeiten. Was ich meine er füllt das Array auf wie oben angegeben und wenn es voll ist fängt er von vorne an. Hoffentlich war das verständlich.
Code: (dl
)
1
2
my $x = int (length($msg) / 106);
unpack("x2 (V V V V C x25 v v v v x2 C x5 C x11 C x3 Z24 C C C C C C C)$x", $msg )