@lines = grep { /\.BO / && ! /CATSETUP|PRODUCT/ } <DATA>;