Help for this page
start_of_block { some_data ; ... start_of_block { data ; };
$/ = "" ; ... s/\nstart_of_block.*?};//s print ; }