Select Code to Download

sub write {
    @_ == 3 or croak 'Usage: $sftp->write($fh, $data)';
...

    utf8::is_utf8($_[2]) and croak "write method can not handle UTf8 d
+ata";
    ...