Align three DNA sequences using Perl

'AAGAATAGTATTTCGCTTTTTTATA';

'AGAAATAGTATTTCGGTTAATTATA';

'AGACATACTAATTCGGTCCATTATA';