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

##</code><code>##

$str =~ /(##(?:[^#]+|#[^#])*/g