or download this
open(INFO, "<", "$infile") or die ("could not open file to append".$!)
+;
open(FILEA, "<", "outputfromvariantparser1.txt") or die ("could not op
+en file to write output");
open(FILEB,">>", output.txt") or die ("could not open file to write ou
+tput");