print DAT "$_\n"; #### print ("$_\n");