system("perl 2_CleanXMLfiles.pl \"$now_string\"");