Roll Right in Perl?

[Netspider]

Hi,

kann man Roll Right irgendwie anständig in perl einbauen?

also die bit-anweisung, die nach rechts shiftet und das was rausfällt links dransetzt (32bit)
">>>" geht nicht, das ist RoR in JS.

Cu, Netspider

[hilker]

Hi,

kann man Roll Right irgendwie anständig in perl einbauen?

klar - einfach 'ne subroutine basteln, die das macht

also die bit-anweisung, die nach rechts shiftet und das was rausfällt links dransetzt (32bit)
">>>" geht nicht, das ist RoR in JS.

Cu, Netspider

[Philipp Hasenfratz]

Halihallo Netspider

kann man Roll Right irgendwie anständig in perl einbauen?

Roll Right ist nichts anderes, als ein logisches UND der rausfallenden Bits, einem
Shift Right und dem anfügen der mit UND gefundenen bit-Folge am Anfang.

also die bit-anweisung, die nach rechts shiftet und das was rausfällt links dransetzt (32bit)
">>>" geht nicht, das ist RoR in JS.

perldoc perlop

'>>' ("Shift Operators") und '&' ("bitwise And")

In den Klammern stehen die Überschriften in perlop. Mit diesen zwei Operatoren (gut, eine
Multiplikation brauchst du auch noch => * oder '<<')
könntest du dein Roll Right effizient umsetzen.

Viele Grüsse

Philipp