Help for this page

Select Code to Download

Select or download this

use Text::Balanced;

...
foreach (@matches) {
    print "$_\n";
}