while<data_file> {

if(/regex1/) {
get some general informations about regex1

do {

get more informations in lines between regex1 e regex2

} until(/regex2/)
}
}