use File::Copy;
copy("/doytest/cgi-bin/Data/00000001.txt" => "/doytest/cgi-bin/Data/Temp/00000001.txt");