Portable OpenSSH's sftp running in batch mode on cygwin? Not 100% pure Perl goodness, but you could use Perl to create batches, start sftp, and interpret the output. Here's a link.