I used net::SFTP in my program . My program is , 
       use Net::SFTP ;
       $host    = "hostName" ;

%args = (
      "user" => "vetri" ,
      "password" => "vetri",
       "debug" => "true" ) ;

my $sftp = Net::SFTP->new($host , %args);
$sftp->put("2", "10");

[download]
I have perl5.6.1 and perl5.8.0 version . In perl5.8.0 It works fine . Here the mentioned the log . 
Net::SSH::Perl Version 1.34, protocol version 2.0
No compat match: OpenSSH_4.3p2 Debian-9
Connection established.
Sent key-exchange init (KEXINIT), wait response
Algorithms, c->s: 3des-cbc hmac-sha1 none  Algorithms, s->c: 3des-cbc 
+hmac-sha1 none
 Entering Diffie-Hellman Group 1 key exchange.
 Sent DH public key, waiting for reply.
Received host key, type 'ssh-dss'.
 Host '192.168.1.130' is known and matches the host key.
 Computing shared secret key.
 Verifying server signature.
 Waiting for NEWKEYS message.
 Send NEWKEYS.
 Enabling encryption/MAC/compression.
 Sending request for user-authentication service.
 Service accepted: ssh-userauth.
 Trying empty user-authentication request.
 Authentication methods that can continue: publickey,password.
 Next method to try is publickey.
 Next method to try is password.
 Trying password authentication.
 Login completed, opening dummy shell channel.
 channel 0: new [client-session]
 Requesting channel_open for channel 0.
channel 0: open confirm rwindow 0 rmax 32768
 channel 1: new [client-session]
 Requesting channel_open for channel 1.
 Sending subsystem: sftp
 Requesting service subsystem on channel 1.
 channel 1: open confirm rwindow 0 rmax 32768
 sftp: Sending SSH2_FXP_INIT
 sftp: Remote version: 3

[download]
But In perl5.6.1 I got segmentation Fault Error 
 Reading configuration data /root/.ssh/config
 Reading configuration data /etc/ssh_config
Allocated local port 1023.
Connecting to 192.168.1.130, port 22.
 Remote protocol version 2.0, remote software version OpenSSH_4.3p2 De
+bian-9
 Net::SSH::Perl Version 1.34, protocol version 2.0.
 No compat match: OpenSSH_4.3p2 Debian-9.
 Connection established.
 Sent key-exchange init (KEXINIT), wait response.
 Algorithms, c->s: 3des-cbc hmac-sha1 none
 Algorithms, s->c: 3des-cbc hmac-sha1 none
Segmentation Fault .

[download]

20090612 Janitored by Corion: Added formatting, code tags, as per Writeup Formatting Tips

In reply to Net::SFTP in perl by vetrivel

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.