use File::Copy;
copy("a/b/*.txt","a/");