How to recursively copy files in a folder to another folder?

Anonymous Monk has asked for the wisdom of the Perl Monks concerning the following question:

I mean, how can I do an "XCopy"(win32 dos command) work using perl? and I can't use those components.

use File::Xcopy;
use File::Copy::Recursive;
# and other components that are NOT included in ActivePerl-5.8.0.805-M
+SWin32-x86.msi
[download]

Because this function will be used in machines that only installed ActivePerl-5.8.0.805-MSWin32-x86.msi