my $in = new Bio::SearchIO(-format => 'blast',
    -file   => $maid_dir."/".$maid."aln_hu.aln",
    -report_type => 'blastn');

##</code><code>##

my $in = new Bio::SearchIO(-format => 'blast',
    -file   => ">".$maid_dir."\\".$maid."aln_hu.aln",
    -report_type => 'blastn');