if ( $data =~ m/E145|R167/ ) ...