my @paragraphs = split /\[\[/, $input;