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