Skip Menu |
 

This queue is for tickets about the Net-SSH-Perl CPAN distribution.

Report information
The Basics
Id: 42403
Status: open
Priority: 0/
Queue: Net-SSH-Perl

People
Owner: Nobody in particular
Requestors: giom87 [...] libero.it
Cc:
AdminCc:

Bug Information
Severity: Important
Broken in: 1.33
Fixed in: (no value)



Subject: 'input must be 8 bytes lon'g in Net::SSH::Perl
Download (untitled) / with headers
text/plain 990b
Hi, When i use Net::SSH::Perl i have this error: input must be 8 bytes long at /usr/local/lib/perl/5.10.0/Crypt/DES.pm line 57. My function is: sub checkHostConnectivity($$$$){ my $hostname = shift; my $port = shift; my $username = shift; my $password = shift; my %params = (port => $port, debug=>1, use_pty=>1 ); $connection = Net::SSH::Perl->new( $hostname , %params ); if ( my $error = $@ ) { chomp $error; &logmessage("Failed to connect to '$hostname'. Reason: '$@'"); return "fail"; } if (!$password || $password =~ /^HASH\(0x[A-Fa-f0-9]+\)/ ){ $connection->login( $username )or do{my $error = $@; chomp $error; &logmessage("Error to login with $username to '$hostname'. Reason: '$error'"); return "fail"; }; }else{ $connection->login( $username, $password )or do{my $error = $@; chomp $error; &logmessage("Error to login with $username to '$hostname'. Reason: '$error'"); return "fail"; }; } $connection->cmd("/bin/false"); return "ok"; } Is this a bug?
Download (untitled) / with headers
text/plain 399b
On Wed Jan 14 08:29:41 2009, giom87 wrote: Show quoted text
> Hi, > > When i use Net::SSH::Perl i have this error: > > input must be 8 bytes long at /usr/local/lib/perl/5.10.0/Crypt/DES.pm > line 57.
Sounds relates to RT #49102 which struggles with UTF8-encoded data. Any chance the incoming data are utf8-encoded? Steffen -- Steffen Schwigon <ss5@renormalist.net> Dresden Perl Mongers <http://dresden-pm.org/>


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.