"not working" is not an error message.

Did the program compile? Did you get any error message? If the copy failed, did you print out $! for more information?

Generally File::Copy works, very likely the problem is on your side.

As andreas1234567 pointed out File::Copy is not suitable, but dircopy in File::Copy::Recursive does what you want