note johngg <p>This might be what you want.</p> <code> knoppix@Microknoppix:~$ perl -E ' > $line = q{(a) Line 1. (b) Line 2. (c) Line 32. (d) Line 42.}; > @arr = split m{(?=\([a-z]\))}, $line; > say qq{>$_<} for @arr;' >(a) Line 1. < >(b) Line 2. < >(c) Line 32. < >(d) Line 42.< knoppix@Microknoppix:~$ </code> <p>I hope this is of use.</p> <!-- Node text goes above. Div tags should contain sig only --> <div class="pmsig"><div class="pmsig-401112"> <p>Cheers,</p><p>JohnGG</p> </div></div> 937621 937621