SJISまじりの文字列を１バイトずつ先頭から整数として
取り出したいのですが、どうすればいいのでしょうか？

ActivePerl（漢字にちゃんと対応してない環境）です。

よろしくお願い致します。