I doubt it worked under 5.6.1. Perhaps it was tested, but then the test was insufficient.

    /^PH.*?[^(H\-000)(IF\-000)]$/
[download]

will reject any file name ending in a 0, including

    PH0022080209401500001PE-000
[download]

yet that is a legal file name according to your specifications.

$ /opt/perl/5.6.1/bin/perl -wle 'print "Reject" unless
      "PH0022080209401500001PE-000" =~ /^PH.*?[^(H\-000)(IF\-000)]$/'
Reject
$
[download]

Abigail