I would suspect that these two lines;

 my $ref_File =~ "<" . $refFile;
 my $blast_File =~ "<" . $blastFile;
[download]

really should be:

 my $ref_File = "<" . $refFile;
 my $blast_File = "<" . $blastFile;
[download]