A real simple way is to set up file shares on each of the remote computers, then run a Perl script to copy files to these shares. Another way is to use ftp servers in conjuction with the standard Perl Net::FTP module. Yet another approach is to use Microsoft SFU (Services for Unix) in conjunction with the standard Windows rcp command. Or set up a common network drive and run a process remotely on each computer to copy from that network drive ... or (perhaps better) don't copy at all, just use the common network drive.

If you give us some more background on what you are trying to achieve and why, we will be better able to help.

Update: If you are just asking how to copy files recursively from one directory to another, you might use the core File::Copy/File::Find modules or the CPAN File::NCopy module or run the Windows xcopy command or the more sophisticated RoboCopy utility from Windows Resource Kit (similar to Unix rsync utility). If you want some sample code, the convention here is that you should first show us what you have tried so far. Do not expect to be spoon fed without first putting in a genuine effort to solve the problem yourself.