Help for this page
$data =~ s{ # First, we'll list things we want # to match, but not throw away ... ) }{$1}gsx;
var b=/\s*;\s*/gi;