Help for this page
while (<DATA>) { print; ... START ENDEND STARTSTARTENDEND STARTSTART ENDEND
s[ ^ (START) ( | \s (?:(?!END).)* ) (END) $ ] [ $1 . $2 . 'insert' . $3 ]ex;