Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked

debugging Net::Sftp::Foreign using ssh2

by sdetweil (Sexton)
on Dec 12, 2012 at 12:58 UTC ( #1008498=perlquestion: print w/replies, xml ) Need Help??

Help for this page

Select Code to Download

  1. or download this
            use Net::SSH2;
            $ftp = Net::SFTP::Foreign->new(ssh2 => $ssh2,
                        backend => 'Net_SSH2');
  2. or download this
            $ftp = Net::SFTP::Foreign->
                 new(host => $ftpSecureServer,
                     backend => 'Net_SSH2',
                     user => $ftpUser,
                     password => $ftpPW);
  3. or download this
               $ftp->put( $zipFileName, $ftpDir."/" . $newname );
               if ( !$@ )
               printl("file $zipFileName upload failed, try later\n");
  4. or download this
              $ftp->put( $zipFileName, $newname );
              if ( !$error )
                # etc
  5. or download this
    libssh2_channel_open_ex(ss->session, pv_channel_type, len_channel_type
    +, window_s
    ize, packet_size, ((void *)0) , 0 ) -> 0x47dc418
    Net::SSH2::Channel::read(size = 5, ext = 0)
    - read 5 bytes
    - read 5 total

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://1008498]
Front-paged by ww
[Tux]: Corion++ hippo++
[ovedpo15]: it isn't homework. its a module I use at work. The process to add additional module isn't worth it. p.s never heard a university course which teach perl
[marto]: there are many, to this day.
[ovedpo15]: @Corion Yes I use the regex you showed me. its very good regex. although now i need to know that substring unit that comma
marto mad corrections to one around 18 months ago
[ovedpo15]: my code checks the value after that comma, if it isn't valid it will remove it. so I would like to remove the substring after that comma meaning getting the string before comma.
[hippo]: Are you sure that Text::CSV_XS isn't already installed at your work? It's such a useful module that it might well be there.
[marto]: pointing out the advantages of cpan modules is well worth in, as both developer and $client/$company benefit greatly
[Tux]: $src =~ m{^(.*),(.*)$/ and $2 !~ $valid and $src = $1;
[Tux]: s,/,},

How do I use this? | Other CB clients
Other Users?
Others romping around the Monastery: (7)
As of 2018-05-27 10:47 GMT
Find Nodes?
    Voting Booth?