100文字程度の任意の文字列をPerlのみで縦書きに書き換えるにあたり、
当方何も思いつきませんので、何か思いついた方がいらしたら教えて下さい。

【入力例】
前走の大敗がよく分からないが、引き続き毛ヅヤや馬体の
張り等は際立って良く見える。

【出力例】
見際体きいよ前
え立の毛がく走
るっ張ヅ、分の
。てりヤ引か大
　良等やきら敗
　くは馬続なが
　　、

実際は縦書き用の等幅フォントを使用します。