>c:\progs\perl560\bin\perl t.pl
-leprint for @ARGV -- -p blastn -d value of $hu_seq value of $hd_seq -i value of $contig -o value of $alignment