Create fa_cal_pairwise_identity.pl