($hoge) = split(/<>/)



$hoge = substr($_, 0, index($_, '<>')

はどちらが効率が良いでしょうか。100回ぐらい繰り返します。