use File::Temp to create a temorary directory, copy files into it, when you're done, rename from temporary name to final name.