$perl sample2.pl
Input: [<tag ref=1>Start<tag ref=2>and more</tag>and end</tag>]
<tag ref=1>
Start
<tag ref=2>
and more
</tag>
and end
</tag>