wet@slack-one:~$ echo '3 blind mice, girls in a tub' > "rub'bish.txt"
wet@slack-one:~$ perl scp-t.pl snoopy wet wetwipe

connecting to snoopy...

auth to snoopy...
Auth OK: 1
scp put
libssh2_scp_send_ex(ss->session, path, mode, size, mtime, atime) -> 0x87123a0
Net::SSH2::Channel::read(size = 1, ext = 0)
- read 1 bytes
- read 1 total
Net::SSH2::Channel::DESTROY
ret: 1
...

Net::SSH2::DESTROY object 0x870a3e8
Net::SSH2: created new object 0x870a3e8
libssh2_scp_recv(ss->session, path, &st) -> 0x87123a0
Net::SSH2::Channel::read(size = 29, ext = 0)
- read 29 bytes
- read 29 total
Net::SSH2::Channel::read(size = 1, ext = 0)
- read 1 bytes
- read 1 total
Net::SSH2::Channel::DESTROY
SSH Error (0): '' - ''
...

Net::SSH2::DESTROY object 0x870a3e8
Net::SSH2: created new object 0x870a3e8
libssh2_scp_recv(ss->session, path, &st) -> 0x0
SSH Error (-28): 'LIBSSH2_ERROR_SCP_PROTOCOL' - 'Failed to recv file'
Net::SSH2::DESTROY object 0x870a3e8
wet@slack-one:~$
wet@slack-one:~$ ls -la
total 24
drwx--x--x 2 wet  users 4096 Aug 12 14:38 ./
drwxr-xr-x 7 root root  4096 Aug 12 13:46 ../
-rw-r--r-- 1 wet  users 3729 Jul 18  2011 .screenrc
-rw-r--r-- 1 wet  users   29 Aug 12 14:37 more-rub'bish.txt
-rw-r--r-- 1 wet  users   29 Aug 12 14:37 rub'bish.txt
-rw-r--r-- 1 wet  users 1260 Aug 12 14:37 scp-t.pl
wet@slack-one:~$