Help for this page
punct: /[^\w\s]/ {print "<punct: $item[1]>" }
punct: /(?:[^\w\s[]+|\[[^\w\s[]*|\[\[(?!.+?]]))+/ {print "<punct: $item[1]>"}