>>42と言うか、perlは型フリーのスクリプト言語なんで整数演算というかビット演算が得手じゃない。
その上にsubstrで文字列処理、ordで数値変換、挙句の果てはpack処理となれば・・・
Ｃの最速処理を移植したんだろうけど、スクリプト言語だと要らん処理が入るから勝手が違うね。