Update fa_cal_pairwise_identity.pl