Hash per socket übergeben - #146801 (Netzwerkprogrammierung und Netzwerke mit Perl)

torsten

2011-03-22 19:38

User since
2010-08-16
45 Artikel
BenutzerIn

2011-03-22T14:43:06 rosti
Also ich serialisiere gerne auf byte-Ebene ;)
Storable.pm ist ok. Zum Selbermachen, zwei Algorithmen:

-packe key und value in Records mit fest vorgegebener Länge like this:
Code: (dl )
$rec = pack "Z255Z255", $key, $value;

Nur zur Info, seit 5.10 ist pack richtig gut geworden. Z.B. geht sowas:

Code (perl): (dl )

1
2

perl -e 'print pack "(w/a)*", @ARGV' vafvga vafdgb wtrbw rhb yhjeyt heythehyetyhe ythetyh etyh |
perl -le 'undef $/; print join "\t", unpack "(w/a)*", scalar <>'

w als Längenangabe ist meist auch besser geeignet, als z.B. N, denn es verbraucht nur so viele Bytes für die Anzahl wie nötig.