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

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?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: perlquestion [id://1008498]
Front-paged by ww
help
Chatterbox?
[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
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Notices?