Write a Perl script to compute the probability of a DNA pairwise
sequence alignment given in FASTA format. Use the HMM model covered
in class. In this model we set

delta (gap open probability) to 0.2
eta (gap extension probability) to 0.4
pm (probability of match) to 0.6
pgap (probability of gap) to 1