Select Code to Download

while (<IN>) {
    if (m/^\d+\sof\s\d+\sDOCUMENTS$/mx ... m/^No.\s\w+$/mx){
...
        /EDUCATION(?{$count++})/g;
    }
}