system("perl prn_to_file.pl $param1 > ../results/output.txt");