while(<>){ s/(?:_|#|XL5 )ALPHA//g; print if /ALPHA/; }