{ local $\ ;
   while (<FILE>) { print $handle $_; } 
}