Hi Rob,
Iam using v5.6.1.,ppm version 2.1.6 .Still iam getting same errors | [reply] |
Looks like your ppm must be finding a cached version of the ppd file - as opposed to reading the file that's now actually on the server. (I didn't expect that would happen.) Anyway, since you're using perl 5.6, then it's not going to work for - though you should be getting different errors to the ones you're seeing.
I'll stick up a ppm for perl 5.6.1 - and update this post with details of how you can access it once the job has been done. (Probably take about half an hour all being well.)
Cheers,
Rob
Update:Try:
ppm install http://members.optusnet.com.au/~sisyphus1/ppms/Net-SSH2-56.ppd
Warning:I had to modify the source code to enable building under perl 5.6.1. To be more specific, Net-SSH2 requires perl 5.8. By using the 5.8 ExtUtils/typemap with perl 5.6.1, and by changing every occurrence of "use 5.008;" to "use 5.006;" (in the Makefile.PL and the all of the .pm files) I was able to get Net-SSH2-0.09 to build with perl 5.6.1. I can't guarantee, however, that there isn't some bug in there just waiting to bite :-)
| [reply] |
Hi Rob,
Thanks for your great help,
yes what you told is right,i am able to install from
http://members.optusnet.com.au/~sisyphus1/ppms/Net-SSH2-56.ppd
but if i am testing with simple code
#!/usr/bin/perl
use warnings;
use strict;
use Net::SSH2;
my $ssh2 = Net::SSH2->new();
$ssh2->connect('$hostname') or die "Unable to connect Host $@ \n";
$ssh2->auth_password('veeru','143') or die "Unable to login $@ \n";
my $chan2 = $ssh2->channel();
$chan2->shell();
print $chan2 "cd /home/john";
print "LINE : $_" while <$chan2>;
print $chan2 "pwd\n";
print "LINE : $_" while <$chan2>;
print $chan2 "ls -lrt \n";
print "LINE : $_" while <$chan2>;
iam getting errors like :
print() on unopened filehandle Net::SSH2::Channel::_GEN_0 at testex.pl line 14.
readline() on unopened filehandle Net::SSH2::Channel::_GEN_0 at testex.pl line 15
print() on unopened filehandle Net::SSH2::Channel::_GEN_0 at testex.pl line 16.
readline() on unopened filehandle Net::SSH2::Channel::_GEN_0 at testex.pl line 17
print() on unopened filehandle Net::SSH2::Channel::_GEN_0 at testex.pl line 19.
readline() on unopened filehandle Net::SSH2::Channel::_GEN_0 at testex.pl line 20
| [reply]
[d/l] |