Perlなら確かまさに>>135の要件を満たすのが有った気がするな
splitだったかな