while ( $line = <FILE> ) {  # skip section 1
    chomp;
    last if $line eq "END LIST";
}
while ( $line = <FILE> ) {
    # do stuff with sections two and three
}