while(<>) {
    chomp and print if /^PH.*$/ and !/[HI]-000$/;
}