use strict;
use warnings;
use MyAlign;

my $aln = new MyAlign;
open ( ALIGN, "<inputAlignmentFile" ) or die "failed to open inputAlignmentFile";
$aln -> read_alignment ( \*ALIGN );
close ALIGN;