2006年08月29日

ビットローテート

Perl でのビットローテーション式。某所での質問に答えたものを汎用型にアレンジしたものです。

$bit_string =
( $bit_string <<= $shift_width % $frame_size )
& 2 ** $frame_size - 1 | $bit_string >> $frame_size;


訊いた人には喜んでもらえたようですが、もっとマシな書き方があるかもしれません。せっかくだから自分用にメモしておきましょう。



……んでコレ、何に使ったらいいですか?

# こういうのを本末転倒と言います。
ラベル:Perl
【関連する記事】
posted by zaruya at 01:25| Comment(2) | TrackBack(0) | Perl | このブログの読者になる | 更新情報をチェックする
この記事へのコメント
そして2年の月日が流れました。
お元気ですか・・・
Posted by ふう at 2008年08月29日 02:34
流れましたねえ。12月にも書いてるんですが、それも時間の問題ですねえ。
Posted by zaruya at 2008年09月10日 21:34
コメントを書く
お名前:

メールアドレス:

ホームページアドレス:

コメント: [必須入力]

認証コード: [必須入力]


※画像の中の文字を半角で入力してください。

この記事へのトラックバック
×

この広告は180日以上新しい記事の投稿がないブログに表示されております。