$str =~ /(##(?:.*\n)*)(?=##|\Z)/g