how to remove blocks between nested brackets



Beeing new to perl and not wanting to learn using it like assembler, I need to delete parts of a single line (possibly long) that are enclosed between nested brackets:

abcd efgh [ij: 123-[456]-klm; nop-789]; qrst; uvw [xyz: 98-76-[ef]; gh; ijkl] (mnop)

The comments between [] must be discarded to split with ';' delimiter.
The expected result is:
array[0] == "abcd efgh"
array[1] == "qrst"
array[2] == "uvw (mnop)"

Thanks for a magic formula.
.



Relevant Pages