$ret = $1 if $g =~ /\n\s*\n((?m:^#.*\n)+)$id/;