in reply to Net::SFTP::Foreign error
Method calls don't interpolate, try: warn( "Put failed: ".$sftp->error."\n" ).