Upated HPRD.pm parse