That's a bit difficult to read. But what you basically seem to need is: glob, chdir, and File::Copy::move. So, what have you tried?