Select Code to Download

while (<UNMODIFIED>) {
    print MODIFIED $_ unless 1 .. /STRUC20/;
    # i.e. do print, except for first line upto a line that matches ST
+RUC20
}