print $newfile; #### print BATCH $newfile;