Update CreateIndex4Fasta.prl