You could use FTP or SCP or some win32 specific protocol. First choose a protocol and then find a perlish way to do it.

If you want to keep using the win32 method you are using now, i don't think (perl|some module) can do a better job at it.