ssh-sftp-perl-users — For users and developers of the Perl SSH and SFTP modules

[Ssh-sftp-perl-users] Net::SSH2?

[David R. <dbr...@cp...>]

Since the SSH2 model is somewhat different from SSH1, especially with the 
existence of channels, I'm considering adding a Net::SSH2 module to the 
distribution, which will support all those extra features without having to 
worry about SSH1 compatibility.  This will fix the "I did cmd('cd foo') and 
cmd('ls') and I got a listing of my home directory" type bugs.

Do people think this is a good idea?

Perhaps it should be Net::SSH2::Perl for consistency?

Obviously the same backend code will be used, it will just add a new interface 
with more functionality.

-- 
Dave
Isa. 40:31

[Ssh-sftp-perl-users] Has anyone got the user/password authenication method to work?

[<BT...@mb...>]

When I specify a user and password the module gets a error " Permission 
denied .... line 38"  trying to create a new contruct for Net::SSH::Perl

It never seems to even try the keyboard auth mode ????????/

output .............

linuxweb1: Reading configuration data /etc/ssh_config
linuxweb1: Allocated local port 1023.
linuxweb1: Connecting to 10.10.16.27, port 22.
linuxweb1: Remote protocol version 2.0, remote
software version OpenSSH_3.9p1 Debian-1ubuntu2
linuxweb1: Net::SSH::Perl Version 1.25, protocol
version 2.0.
linuxweb1: No compat match: OpenSSH_3.9p1
Debian-1ubuntu2.
linuxweb1: Connection established.
linuxweb1: Sent key-exchange init (KEXINIT), wait
response.
linuxweb1: Algorithms, c->s: 3des-cbc hmac-sha1 none
linuxweb1: Algorithms, s->c: 3des-cbc hmac-sha1 none
linuxweb1: Entering Diffie-Hellman Group 1 key
exchange.
linuxweb1: Sent DH public key, waiting for reply.
linuxweb1: Received host key, type 'ssh-dss'.
linuxweb1: Host '10.10.16.27' is known and matches the
host key.
linuxweb1: Computing shared secret key.
linuxweb1: Verifying server signature.
linuxweb1: Waiting for NEWKEYS message.
linuxweb1: Enabling incoming
encryption/MAC/compression.
linuxweb1: Send NEWKEYS, enable outgoing
encryption/MAC/compression.
linuxweb1: Sending request for user-authentication
service.
linuxweb1: Service accepted: ssh-userauth.
linuxweb1: Trying empty user-authentication request.
linuxweb1: Authentication methods that can continue:
publickey,keyboard-interactive.
linuxweb1: Next method to try is publickey.
Permission denied at
/usr/lib/perl5/vendor_perl/5.8.6/Net/SFTP.pm line 38

[Ssh-sftp-perl-users] Problem with Net::SSH::Perl

[Thompson, M. <Mar...@uk...>]

Hi,

I'm trying to build in Net::SSH::Perl into my Perl 5.8 installation on a
Solaris 8 server, and I've managed to get it to work part of the way. It now
seems to stall when trying to use pubkey authentication (which is what I
want to use). I have a feeling it's something to do with the Math::BigInt
being too slow but I have installed all the Pari libs etc. When my test
script reaches the pubkey point it consumes 70% CPU and never comes back.

The output I get is:

host-not-web01: Reading configuration data //.ssh/config
host-not-web01: Reading configuration data /etc/ssh_config
host-not-web01: Allocated local port 1023.
host-not-web01: Connecting to mercury-prod-1, port 22.
host-not-web01: Remote protocol version 2.0, remote software version
OpenSSH_3.4p1
host-not-web01: Net::SSH::Perl Version 1.28, protocol version 2.0.
host-not-web01: No compat match: OpenSSH_3.4p1.
host-not-web01: Connection established.
host-not-web01: Sent key-exchange init (KEXINIT), wait response.
host-not-web01: Algorithms, c->s: 3des-cbc hmac-sha1 none
host-not-web01: Algorithms, s->c: 3des-cbc hmac-sha1 none
host-not-web01: Entering Diffie-Hellman Group 1 key exchange.
host-not-web01: Sent DH public key, waiting for reply.
host-not-web01: Received host key, type 'ssh-dss'.
host-not-web01: Host 'mercury-prod-1' is known and matches the host key.
host-not-web01: Computing shared secret key.
host-not-web01: Verifying server signature.
host-not-web01: Waiting for NEWKEYS message.
host-not-web01: Enabling incoming encryption/MAC/compression.
host-not-web01: Send NEWKEYS, enable outgoing encryption/MAC/compression.
host-not-web01: Sending request for user-authentication service.
host-not-web01: Service accepted: ssh-userauth.
host-not-web01: Trying empty user-authentication request.
host-not-web01: Authentication methods that can continue:
publickey,password,keyboard-interactive.
host-not-web01: Next method to try is publickey.
host-not-web01: Trying pubkey authentication with key file '//.ssh/id_dsa'


The same script works on the standard 5.005 perl that comes with Solaris 8,
and I can use the normal ssh commands fine.

Any help will be much appreciated.

Thanks,

Mark 

Find out about The Experian Conference 2005 at www.experian.co.uk/conference2005


==========================================================================
Information in this e-mail and any attachments are confidential, and may not be copied or used by anyone other than the addressee, nor disclosed to any third party without our permission. There is no intention to create any legally binding contract or other binding commitment through the use of this electronic communication unless it is issued in accordance with the Experian Limited standard terms and conditions of purchase or other express written agreement between Experian Limited and the recipient Experian Limited (registration number 653331) Registered office: Talbot House, Talbot Street, Nottingham NG80 1TH

Although Experian has taken reasonable steps to ensure that this communication and any attachments are free from computer virus, you are advised to take your own steps to ensure that they are actually virus free.

[Ssh-sftp-perl-users] Connection Problems to specific SFTP Servers, plus patch to fix

[<Sea...@pr...>]

Hello All,
	We're trying to automate an sftp file transfer with a partner
who uses Sterling Commerce -- It uses openssh under the covers, but it
must be tweaked in some way because Net::SFTP errors out when it
connects to their server. When we try to connect, we get this error:

Error: Received disconnect message: Unsupported request (shell).
 at /opt/perl-5.8.2/lib/site_perl/5.8.2/Net/SSH/Perl/SSH2.pm line 281


	After further investigation, we determined that Net::SSH::Perl
is always opening a channel for shell -- Which makes perfect sense,
except when you are doing SFTP and can't get a shell channel. So we
whipped together a path for Net::SSH::Perl which make that an optional
behavior, and a patch for Net::SFTP, which makes it use that option.

	The patches are against the latest CVS -- there didn't seem to
be a v1_28 tag in CVS, but the files don't seem to be that different
from HEAD.

	--Sean McMillan,
	Priority Health




** ** **  PRIVILEGED AND CONFIDENTIAL  ** ** **
This email transmission contains privileged and confidential information=20
intended only for the use of the individual or entity named above.  Any=20
unauthorized review, use, disclosure or distribution is prohibited and=20
may be a violation of law.  If you are not the intended recipient or a=20
person responsible for delivering this message to an intended recipient,=20
please delete the email and immediately notify the sender via the email=20
return address or mailto:pos...@pr....  Thank you.


- end -
=0D

[Ssh-sftp-perl-users] Couldn't fsetstat: Failure

[William C. Sr. <wil...@ya...>]

Hello,

I am getting:

Couldn't fsetstat: Failure at
/usr/local/lib/perl5/site_perl/5.6.1/Net/SFTP.pm line
200.

ever since the sftp server software on the Solaris box
that I sftp with was recently upgraded. The file
transfers seem to still work fine.

The sftp client box I get the message on is also Sun
Solaris Unix and I have not chamged anything on it.

An excerpt from my code where I think the message is
getting triggered is here:


chdir "$HOMEDIR/getrct";
while (<*>) {
  $fn=$_;
  if ($fn=~/^([0-9A-Za-z]+)_([\w-]+)\.(rct|dhr|tmd)$/
&& $locdir{$1}) {
    $locd=$1; # location code
    $fname=$2; # name without loc code or extension
    $dirp=equatelocs(o,$locdir{$locd});
    $sftp->put("$fn", "$dirp/$locd\_$fname\.rc_");
    $sftp->do_rename("$dirp/$locd\_$fname\.rc_",
"$dirp/$fn");
    move ("$fn", "$HOMEDIR/getrctd") or do {warn "$!";
next};
    logmon(dnrct, "$HOMEDIR/getrctd/$fn", "RTSU")
             or do {warn "$!"; next};
    $fcntp++;
  }
}


I looked at SFTP.pm and I think it's the do_rename.

As an applictions person, it is easier to change my
application code than to get the perl packages
changed.

The error generates a lot of error email do be sifted
through so I would like to fix it, or if it isn't
hurting anything, I'd like to eliminate that
particular error message.

Thank you so much for any help on this issue.

Will Cardwell

Re: [Ssh-sftp-perl-users] Error: Wide character in subroutine entry at /usr/lib/perl5/vendor_perl/5.8.0/Digest/HMAC.pm line 59

[Robert L. <rla...@ao...>]

On Thu, Jul 21, 2005 at 09:51:42PM -1000, Kr@nX wrote:
> use Cwd 'abs_path';
> $currentpath = abs_path($ENV{'PWD'});
> 
> my %args = ("user", 'user', "password", 'passwd', "debug", '1');
> my $host = 'node2';
> my $sftp = Net::SFTP->new($host,%args);
> 
> for ($a=0; $a < scalar(@node2_files); $a++) {
>   my $localfile = $currentpath . "/". $node2_files[$a];
>   #my $remotefile = 'test';
>   my $remotefile = '/home/user/' . $node2_files[$a];
> 
>   $sftp->put($localfile,$remotefile);
>   }
> 
[snip]
> master: channel 1: open confirm rwindow 0 rmax 32768
> master: sftp: Sending SSH2_FXP_INIT
> master: sftp: Remote version: 3
> master: sftp: Sent SSH2_FXP_OPEN I:0 P:/home/user/epoch104.TXT
> Wide character in subroutine entry at /usr/lib/perl5/vendor_perl/5.8.0/Digest/HMAC.pm line 59.
> 

I'm just guessing here, but I bet there's some garbage at the end of the 
filename...  Something like a newline or carriage return.  Or a null.

Right after the assignment, try doing something like

  $remotefile =~ s/\r|\n|\0//g;

And just FYI, I think

  use Cwd;
  $currentpath = cwd();

will do what you want, at least most of the time.

Hope that helps,

Rob

[Ssh-sftp-perl-users] Error: Wide character in subroutine entry at /usr/lib/perl5/vendor_perl/5.8.0/Digest/HMAC.pm line 59

[<Kr...@nX...>]

I would like to upload some of the files from a directory to another node.
i saved the target files into an array called @node2_files, opened a $sftp
connection and loop over the array content to send the files one by one.
Here is part of the codes:

------------------
use Cwd 'abs_path';
$currentpath = abs_path($ENV{'PWD'});

my %args = ("user", 'user', "password", 'passwd', "debug", '1');
my $host = 'node2';
my $sftp = Net::SFTP->new($host,%args);

for ($a=0; $a < scalar(@node2_files); $a++) {
  my $localfile = $currentpath . "/". $node2_files[$a];
  #my $remotefile = 'test';
  my $remotefile = '/home/user/' . $node2_files[$a];

  $sftp->put($localfile,$remotefile);
  }

-----------
if i uncomment the line: #my $remotefile = 'test';
and comment the one right below,
it runs "fine": at least the files are uploaded correctly, and saved into
a new text file named test in /home/user/ - but of course i only get the
last file with name: test

but i really want to maintain the original file name.

So, if i use the uncommented line:
my $remotefile = '/home/user/' . $node2_files[$a];

i get:

master: Reading configuration data /home/chaos/.ssh/config
master: Reading configuration data /etc/ssh_config
master: Connecting to node2, port 22.
master: Remote protocol version 1.99, remote software version OpenSSH_3.5p1
master: Net::SSH::Perl Version 1.28, protocol version 2.0.
master: No compat match: OpenSSH_3.5p1.
master: Connection established.
master: Sent key-exchange init (KEXINIT), wait response.
master: Algorithms, c->s: 3des-cbc hmac-sha1 none
master: Algorithms, s->c: 3des-cbc hmac-sha1 none
master: Entering Diffie-Hellman Group 1 key exchange.
master: Sent DH public key, waiting for reply.
master: Received host key, type 'ssh-dss'.
master: Host 'node2' is known and matches the host key.
master: Computing shared secret key.
master: Verifying server signature.
master: Waiting for NEWKEYS message.
master: Enabling incoming encryption/MAC/compression.
master: Send NEWKEYS, enable outgoing encryption/MAC/compression.
master: Sending request for user-authentication service.
master: Service accepted: ssh-userauth.
master: Trying empty user-authentication request.
master: Authentication methods that can continue:
publickey,password,keyboard-interactive.
master: Next method to try is publickey.
master: Next method to try is password.
master: Trying password authentication.
master: Login completed, opening dummy shell channel.
master: channel 0: new [client-session]
master: Requesting channel_open for channel 0.
master: channel 0: open confirm rwindow 0 rmax 32768
master: Got channel open confirmation, requesting shell.
master: Requesting service shell on channel 0.
master: channel 1: new [client-session]
master: Requesting channel_open for channel 1.
master: Sending subsystem: sftp
master: Requesting service subsystem on channel 1.
master: channel 1: open confirm rwindow 0 rmax 32768
master: sftp: Sending SSH2_FXP_INIT
master: sftp: Remote version: 3
master: sftp: Sent SSH2_FXP_OPEN I:0 P:/home/user/epoch104.TXT
Wide character in subroutine entry at /usr/lib/perl5/vendor_perl/5.8.0/Digest/HMAC.pm line 59.

---------

Could anyone send sugestions to help me fix this problem?
Mahalo
rv,

[Ssh-sftp-perl-users] Net::SFTP - 2 Bugs

[Stefan G. <st...@zi...>]

Hi,

I am testing Net::SFTP.
I am doing this on Slackware 10.0 and on Slackware-current. both with
perl 5.8.4.

I am seeing 2 problems

I made a simple test script

----
      1 #!/usr/bin/perl -w
      2 use strict;
      3 use Net::SFTP;
      4 my( $host, $userName, $passWord , %args);
      5
      6 $host = "localhost";
      7 $userName = "root";
      8 $passWord = "Re9RaG1duN";
      9
     10 $args{user} = $userName;
     11 $args{password} = $passWord;
     12
     13 my $sftp = Net::SFTP->new($host, %args);
     14 $sftp->ls( ".", sub { print "++ ", $_[0]->{longname}, "\n" } );
-----


Problem 1
---------

I have a file ~/.ssh/config
this faile contains
----
host AnyDumbHost
User NoSuchUser
----

If i run my script i get following problem.

$ ./sftp-test
Received disconnect message: Too many authentication failures for NoSuchUser
 at /usr/lib/perl5/site_perl/5.8.4/Net/SSH/Perl/AuthMgr.pm line 142
$

When i remove this file the script works fine.


Problem 2
---------

Same script (no ~/.ssh/config file)

I start the script and immediately pres Enter at least once.

$ ./sftp-test
                                       <----  Enter pressed in shell
Connection closed at ./sftp-test line 14
$

line 565 in SFTP.pm
croak "Connection closed" unless $buf->length > 4;

aparently the buffer gets filled from STDIN with the Enter and that
ruins the script.



I hope this info can be usefull to make Net::SFTP better.

Thanks for a nice piece of software!

Stefan Goethals.

Re: [Ssh-sftp-perl-users] Very slow auth.

[Eric L. <net...@er...>]

This could go back to the problem I posted about a week or so ago with slow 
authentication with Net::SSH::Perl. It's been confirmed by a couple of 
people on the list that they can reproduce the problem, but as of yet, I 
don't believe there have been any suggestions on how to fix it.

I know it's with Net::SSH::Perl since if I do the same commands either 
through a shell script or using Net::SSH I don't have the same problem.


----- Original Message ----- 
From: "Jim Lane" <Jim...@rc...>
To: "Kalin Evtimov" <Ev...@we...>; 
<ssh...@li...>
Sent: Friday, July 15, 2005 5:46 AM
Subject: RE: [Ssh-sftp-perl-users] Very slow auth.


Kalin: at the risk of belabouring the obvious are you sure the fault is with 
Net::SSH::Perl? How fast or slow is it if you type out the equivalent 
commands from a shell prompt? Are you connecting to more than one system? If 
so, are they all equally slow? And equally so at all times?
Perhaps the problem is with the underlying network.
HTH

Jim Lane          Amateurs built the Ark,
Capacity Planner  Professionals built the Titanic.


-----Original Message-----
From: ssh...@li... 
[mailto:ssh...@li...] On Behalf Of Kalin 
Evtimov
Sent: Friday, July 15, 2005 6:18 AM
To: ssh...@li...
Subject: [Ssh-sftp-perl-users] Very slow auth.



Hi!
I am using Net::SSH::Perl on HP-UX 11.23 (IA46), and it works, but it is 
extremely slow while athenticating. Somebody already had this problem, but 
as I could read there was no solution. Changing PERL on my machine is not 
posssible, because I need exactly this version for another apps. (Perl 
5.8.6) Does anybody know anything?

Greetz!


Kalin 
_________________________________________________________________________
Mit der Gruppen-SMS von WEB.DE FreeMail können Sie eine SMS an alle
Freunde gleichzeitig schicken: http://freemail.web.de/features/?mc=021179





-------------------------------------------------------
SF.Net email is sponsored by: Discover Easy Linux Migration Strategies from 
IBM. Find simple to follow Roadmaps, straightforward articles, informative 
Webcasts and more! Get everything you need to get up to speed, fast. 
http://ads.osdn.com/?ad_idt77&alloc_id492&op=ick
_______________________________________________
Ssh-sftp-perl-users mailing list Ssh...@li...
https://lists.sourceforge.net/lists/listinfo/ssh-sftp-perl-users


-------------------------------------------------------
SF.Net email is sponsored by: Discover Easy Linux Migration Strategies
from IBM. Find simple to follow Roadmaps, straightforward articles,
informative Webcasts and more! Get everything you need to get up to
speed, fast. http://ads.osdn.com/?ad_idt77&alloc_id492&op=ick
_______________________________________________
Ssh-sftp-perl-users mailing list
Ssh...@li...
https://lists.sourceforge.net/lists/listinfo/ssh-sftp-perl-users

RE: [Ssh-sftp-perl-users] Very slow auth.

[Jim L. <Jim...@rc...>]

Kalin: at the risk of belabouring the obvious are you sure the fault is =
with Net::SSH::Perl? How fast or slow is it if you type out the =
equivalent commands from a shell prompt? Are you connecting to more than =
one system? If so, are they all equally slow? And equally so at all =
times?
Perhaps the problem is with the underlying network.
HTH

Jim Lane          Amateurs built the Ark,
Capacity Planner  Professionals built the Titanic.


-----Original Message-----
From: ssh...@li... =
[mailto:ssh...@li...] On Behalf Of =
Kalin Evtimov
Sent: Friday, July 15, 2005 6:18 AM
To: ssh...@li...
Subject: [Ssh-sftp-perl-users] Very slow auth.



Hi!
I am using Net::SSH::Perl on HP-UX 11.23 (IA46), and it works, but it is =
extremely slow while athenticating. Somebody already had this problem, =
but as I could read there was no solution. Changing PERL on my machine =
is not posssible, because I need exactly this version for another apps. =
(Perl 5.8.6) Does anybody know anything?

Greetz!


Kalin =
_________________________________________________________________________=

Mit der Gruppen-SMS von WEB.DE FreeMail k=F6nnen Sie eine SMS an alle=20
Freunde gleichzeitig schicken: =
http://freemail.web.de/features/?mc=3D021179





-------------------------------------------------------
SF.Net email is sponsored by: Discover Easy Linux Migration Strategies =
from IBM. Find simple to follow Roadmaps, straightforward articles, =
informative Webcasts and more! Get everything you need to get up to =
speed, fast. http://ads.osdn.com/?ad_idt77&alloc_id=16492&op=3Dick
_______________________________________________
Ssh-sftp-perl-users mailing list =
Ssh...@li...
https://lists.sourceforge.net/lists/listinfo/ssh-sftp-perl-users

[Ssh-sftp-perl-users] Very slow auth.

[Kalin E. <Ev...@we...>]

Hi!
I am using Net::SSH::Perl on HP-UX 11.23 (IA46), and it works, but it is e=
xtremely slow while athenticating. Somebody already had this problem, but =
as I could read there was no solution. Changing PERL on my machine is not =
posssible, because I need exactly this version for another apps. (Perl 5.8=
.6) Does anybody know anything=3F

Greetz!


Kalin
=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F=5F
Mit der Gruppen-SMS von WEB.DE FreeMail k=F6nnen Sie eine SMS an alle=20
Freunde gleichzeitig schicken: http://freemail.web.de/features/=3Fmc=3D021179

[Ssh-sftp-perl-users] put() hangs and debug warning message

[Chad E. <cei...@rd...>]

Greetings,
 
I have a script I'm using to transfer compressed files between 100MB and
1GB. For some of the larger files the upload reaches a certain point and I
receive the following error message from debugging: "Warning: ignore packet
type 20." After the warning message put() apparently gets stuck in a loop
(judging from an strace) and no more data is transferred. If I transfer the
file with a non-perl SFTP client it works fine. Anyone know what causes the
warning message or why put() is hanging? I'm using Net::SFTP 0.09. Thanks,
 
Chad
 

[Ssh-sftp-perl-users] RE : Ssh-sftp-perl-users digest, Vol 1 #108 - 5 msgs

[<Fra...@gl...>]

Hi, I'm facing the same problem as Steve Neuharth
Please find below the problem's description :=20



I want my perl program to connect to a server using SSH.
I want to connect to remote servers I've never been before.
In fact, the program's aim will be to copy a public key on several =
remote servers. Here is the error raised by perl : Not an ARRAY =
reference at /usr/local/share/perl/5.8.4/Math/BigInt/Calc.pm line 222. =
As far as I am concerned I had lots of difficulties to get the =
Net:SSH:perl lib to compile through the cpan shell. Here is my code : =
$adresse_ip=3D"192.168.100.54"; $user=3D"user"; $pass=3D"xxxx"; =
$params{debug} =3D 1; $params{interactive} =3D 0; $params{protocol} =3D =
'2,1';

$ssh =3D Net::SSH::Perl->new($adresse_ip,%params,options =3D>["BatchMode =
yes","RhostsRSAAuthentication no"]); $ssh->login($user, $pass); =
($stdout, $stderr, $exit) =3D $ssh->cmd("ls"); print $stdout; print =
$stderr; print $exit; Here is the debug output :=20
Reading configuration data /home/kudjat/.ssh/config
Reading configuration data /etc/ssh_config
Connecting to 195.110.248.210, port 22.
Remote protocol version 2.0, remote software version OpenSSH_3.7.1p1 =
Net::SSH::Perl Version 1.28, protocol version 2.0. No compat match: =
OpenSSH_3.7.1p1. 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 '195.110.248.210' is known and matches the =
host key. Not an ARRAY reference at =
/usr/local/share/perl/5.8.4/Math/BigInt/Calc.pm line 222.

Many thanks for your help.
Regards,
Fran=E7ois
PS : I am running perl on a Debian 2.4.27-1-386
Perl version is 5.8.4
CPAN version is 1.7601
Net::SSH::Perl Version 1.28, protocol version 2.0.

-----Message d'origine-----
De : ssh...@li... =
[mailto:ssh...@li...] De la part de =
ssh...@li...
Envoy=E9 : jeudi 7 juillet 2005 05:38
=C0 : ssh...@li...
Objet : Ssh-sftp-perl-users digest, Vol 1 #108 - 5 msgs


Send Ssh-sftp-perl-users mailing list submissions to
	ssh...@li...

To subscribe or unsubscribe via the World Wide Web, visit
	https://lists.sourceforge.net/lists/listinfo/ssh-sftp-perl-users
or, via email, send a message with subject or body 'help' to
	ssh...@li...

You can reach the person managing the list at
	ssh...@li...

When replying, please edit your Subject line so it is more specific than =
"Re: Contents of Ssh-sftp-perl-users digest..."


Today's Topics:

   1. RE: Slow Authentication (Yishay Weiss)
   2. Not an ARRAY reference at /usr/lib/perl5/5.8.5/Math/BigInt/Calc.pm
       line 968 (Steve Neuharth)
   3. Re: Not an ARRAY reference at =
/usr/lib/perl5/5.8.5/Math/BigInt/Calc.pm
       line 968 (Steve Neuharth)

--__--__--

Message: 1
From: "Yishay Weiss" <yis...@ho...>
To: ssh...@li...
Subject: RE: [Ssh-sftp-perl-users] Slow Authentication
Date: Wed, 06 Jul 2005 13:15:55 +0000

I'm having the same problem using. I ran your script and am having the =
same=20
results using 5.8.7 on Red Hat Enterprise Linux AS release 3 (Taroon).

Using 5.8.4 on Windows XP your script runs quick and there's no problem.



>From: "Eric Langheinrich" <net...@er...>
>To: <ssh...@li...>
>Subject: [Ssh-sftp-perl-users] Slow Authentication
>Date: Mon, 4 Jul 2005 16:15:34 -0600
>
>I'm having some trouble with slow logins using Net::SSH::Perl. I've=20
>used
>the module on other machines in the past and love what I can do with =
it,=20
>but the slow authentication I'm seeing currently is a pain.
>
>I'm using Perl 5.8.0 with the latest versions of the modules downloaded
>from CPAN. Machine is a dual XEON with 64 Bit Redhat Enterprise 3.1=20
>installed. Tried installing using MCPAN and also manually downloading =
and=20
>installing each module. Didn't seem to help.
>
>To try and narrow things down, I've put a little script together that
>simply goes and performs an 'ls' on the remote machine.
>
>use strict;
>use Net::SSH::Perl;
>use vars qw($ssh);
>
>
>my @ident =3D ( "/home/user/.ssh/id_dsa");
>my %params =3D (
>         protocol =3D> 2,
>         interactive =3D> 0,
>         identity_files =3D> [@ident],
>         debug =3D> 1,
>         options =3D> [
>                 "BatchMode yes",
>                 "AuthenticationSuccessMsg no",
>                 "ForwardX11 no",
>                 "ForwardAgent no"
>         ]
>);
>
>my $server =3D $ARGV[0];
>&sshconnect($server);
>my ($stdout, $stderr, $exit) =3D $ssh->cmd("ls");
>print "$stdout\n";
>if (! $ssh) {
>         print "Unable to establish ssh connection to: $server\n"; }=20
>else {
>         print "Successfully established ssh connection to: $server\n"; =

>}
>
>sub sshconnect {
>         my $server =3D $_[0];
>         our $ssh =3D Net::SSH::Perl->new("$server", %params);
>         $ssh->login("user");
>}
>
>
>Output with the debug flag is as follows:
>
>d: Reading configuration data /root/.ssh/config
>d: Reading configuration data /etc/ssh_config
>d: Allocated local port 1022.
>d: Connecting to remote1, port 22.
>d: Remote protocol version 2.0, remote software version OpenSSH_3.6.1p2
>d: Net::SSH::Perl Version 1.28, protocol version 2.0.
>d: No compat match: OpenSSH_3.6.1p2.
>d: Connection established.
>d: Sent key-exchange init (KEXINIT), wait response.
>d: Algorithms, c->s: 3des-cbc hmac-sha1 none
>d: Algorithms, s->c: 3des-cbc hmac-sha1 none
>d: Entering Diffie-Hellman Group 1 key exchange.
>d: Sent DH public key, waiting for reply.
>d: Received host key, type 'ssh-dss'.
>d: Host 'remote1' is known and matches the host key.
>d: Computing shared secret key.
>d: Verifying server signature.
>d: Waiting for NEWKEYS message.
>d: Enabling incoming encryption/MAC/compression.
>d: Send NEWKEYS, enable outgoing encryption/MAC/compression.
>d: Sending request for user-authentication service.
>d: Service accepted: ssh-userauth.
>d: Trying empty user-authentication request.
>d: Authentication methods that can continue:
>publickey,password,keyboard-interactive.
>d: Next method to try is publickey.
>d: Trying pubkey authentication with key file '/home/user/.ssh/id_dsa'
>d: Login completed, opening dummy shell channel.
>d: channel 0: new [client-session]
>d: Requesting channel_open for channel 0.
>d: channel 0: open confirm rwindow 0 rmax 32768
>d: Got channel open confirmation, requesting shell.
>d: Requesting service shell on channel 0.
>d: channel 1: new [client-session]
>d: Requesting channel_open for channel 1.
>d: Entering interactive session.
>d: Sending command: ls
>d: Requesting service exec on channel 1.
>d: channel 1: open confirm rwindow 0 rmax 32768
>d: input_channel_request: rtype exit-status reply 0
>d: channel 1: rcvd eof
>d: channel 1: output open -> drain
>d: channel 1: rcvd close
>d: channel 1: input open -> closed
>d: channel 1: close_read
>d: channel 1: obuf empty
>d: channel 1: output drain -> closed
>d: channel 1: close_write
>d: channel 1: send close
>d: channel 1: full closed
>authorized_keys
>sites
>
>Successfully established ssh connection to: remote1
>
>
>The delay seems to happen primarily in two places. First at the line:=20
>d:
>Algorithms, s->c: 3des-cbc hmac-sha1 none
>which takes 10 seconds or so, then again at: d: Computing shared secret =

>key.
>
>Which again takes 10 or 15 seconds.
>
>Any help would be greatly appreciated. I'd like to not have to rewrite=20
>the
>whole process to use Net::SSH

_________________________________________________________________
Express yourself instantly with MSN Messenger! Download today - it's =
FREE!=20
http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/



--__--__--

Message: 2
Date: Wed, 06 Jul 2005 16:26:44 -0500
From: Steve Neuharth <ste...@vi...>
To: ssh...@li...
Subject: [Ssh-sftp-perl-users] Not an ARRAY reference at =
/usr/lib/perl5/5.8.5/Math/BigInt/Calc.pm
 line 968

here's my script:

#!/usr/bin/perl

use strict ;
use lib '/opt/lib/perl' ;
use Net::SFTP qw(scp) ;

my %sftpArgs =3D (
                user =3D> 'user',
                password =3D> 'password',

        warn =3D> '0',
        debug =3D> '1',
) ;

my $sftp =3D Net::SFTP -> new('127.0.0.1', %sftpArgs) ;
$sftp -> put("/etc/passwd", "/tmp") ;

Here's what happens....

[root@pnazlx236 ~]# perl test.pl
pnazlx236.nat.teci.com: Reading configuration data /root/.ssh/config
pnazlx236.nat.teci.com: Reading configuration data /etc/ssh_config
pnazlx236.nat.teci.com: Allocated local port 1023.
pnazlx236.nat.teci.com: Connecting to 127.0.0.1, port 22.
pnazlx236.nat.teci.com: Remote protocol version 1.99, remote software=20
version OpenSSH_3.9p1
pnazlx236.nat.teci.com: Net::SSH::Perl Version 1.28, protocol version =
2.0.
pnazlx236.nat.teci.com: No compat match: OpenSSH_3.9p1.
pnazlx236.nat.teci.com: Connection established.
pnazlx236.nat.teci.com: Sent key-exchange init (KEXINIT), wait response.
pnazlx236.nat.teci.com: Algorithms, c->s: 3des-cbc hmac-sha1 none
pnazlx236.nat.teci.com: Algorithms, s->c: 3des-cbc hmac-sha1 none
pnazlx236.nat.teci.com: Entering Diffie-Hellman Group 1 key exchange.
pnazlx236.nat.teci.com: Sent DH public key, waiting for reply.
pnazlx236.nat.teci.com: Received host key, type 'ssh-dss'.
pnazlx236.nat.teci.com: Host '127.0.0.1' is known and matches the host =
key. Not an ARRAY reference at /usr/lib/perl5/5.8.5/Math/BigInt/Calc.pm =
line 968.

what's with BigInt?

I'm running RHEL4, kernel 2.6.9-11.ELsmp, perl 5.8 and modules compiled=20
from CPAN.



--__--__--

Message: 3
Date: Wed, 06 Jul 2005 17:24:12 -0500
From: Steve Neuharth <ste...@vi...>
To: ssh...@li...
Subject: Re: [Ssh-sftp-perl-users] Not an ARRAY reference at =
/usr/lib/perl5/5.8.5/Math/BigInt/Calc.pm
 line 968

strange, installing Math::BigInt::GMP fixed it but I don't see that=20
listed as a dependency anywhere. Did I miss something in the docs?

Steve Neuharth wrote:

> here's my script:
>
> #!/usr/bin/perl
>
> use strict ;
> use lib '/opt/lib/perl' ;
> use Net::SFTP qw(scp) ;
>
> my %sftpArgs =3D (
>                user =3D> 'user',
>                password =3D> 'password',
>
>        warn =3D> '0',
>        debug =3D> '1',
> ) ;
>
> my $sftp =3D Net::SFTP -> new('127.0.0.1', %sftpArgs) ;
> $sftp -> put("/etc/passwd", "/tmp") ;
>
> Here's what happens....
>
> [root@pnazlx236 ~]# perl test.pl
> pnazlx236.nat.teci.com: Reading configuration data /root/.ssh/config
> pnazlx236.nat.teci.com: Reading configuration data /etc/ssh_config
> pnazlx236.nat.teci.com: Allocated local port 1023.
> pnazlx236.nat.teci.com: Connecting to 127.0.0.1, port 22.
> pnazlx236.nat.teci.com: Remote protocol version 1.99, remote software
> version OpenSSH_3.9p1
> pnazlx236.nat.teci.com: Net::SSH::Perl Version 1.28, protocol version=20
> 2.0.
> pnazlx236.nat.teci.com: No compat match: OpenSSH_3.9p1.
> pnazlx236.nat.teci.com: Connection established.
> pnazlx236.nat.teci.com: Sent key-exchange init (KEXINIT), wait =
response.
> pnazlx236.nat.teci.com: Algorithms, c->s: 3des-cbc hmac-sha1 none
> pnazlx236.nat.teci.com: Algorithms, s->c: 3des-cbc hmac-sha1 none
> pnazlx236.nat.teci.com: Entering Diffie-Hellman Group 1 key exchange.
> pnazlx236.nat.teci.com: Sent DH public key, waiting for reply.
> pnazlx236.nat.teci.com: Received host key, type 'ssh-dss'.
> pnazlx236.nat.teci.com: Host '127.0.0.1' is known and matches the host =

> key.
> Not an ARRAY reference at /usr/lib/perl5/5.8.5/Math/BigInt/Calc.pm=20
> line 968.
>
> what's with BigInt?
>
> I'm running RHEL4, kernel 2.6.9-11.ELsmp, perl 5.8 and modules
> compiled from CPAN.
>
>
>
> -------------------------------------------------------
> SF.Net email is sponsored by: Discover Easy Linux Migration Strategies =

> from IBM. Find simple to follow Roadmaps, straightforward articles,=20
> informative Webcasts and more! Get everything you need to get up to=20
> speed, fast. =
http://ads.osdn.com/?ad_id=3D7477&alloc_id=3D16492&op=3Dclick
> _______________________________________________
> Ssh-sftp-perl-users mailing list=20
> Ssh...@li...
> https://lists.sourceforge.net/lists/listinfo/ssh-sftp-perl-users
>




--__--__--

_______________________________________________
Ssh-sftp-perl-users mailing list =
Ssh...@li...
https://lists.sourceforge.net/lists/listinfo/ssh-sftp-perl-users


End of Ssh-sftp-perl-users Digest




This email communication is confidential and is intended solely for whom =
it is addressed. Copying, or re-using in any way by anyone else is =
unauthorised. Any views or opinions expressed are those of the author =
and do not necessarily represent those of GL TRADE or any of its =
affiliates.=20

If you have received this mail in error, please destroy the copy in your =
possession and notify ab...@gl...

Re: [Ssh-sftp-perl-users] Not an ARRAY reference at /usr/lib/perl5/5.8.5/Math/BigInt/Calc.pm line 968

[Steve N. <ste...@vi...>]

strange, installing Math::BigInt::GMP fixed it but I don't see that 
listed as a dependency anywhere. Did I miss something in the docs?

Steve Neuharth wrote:

> here's my script:
>
> #!/usr/bin/perl
>
> use strict ;
> use lib '/opt/lib/perl' ;
> use Net::SFTP qw(scp) ;
>
> my %sftpArgs = (
>                user => 'user',
>                password => 'password',
>
>        warn => '0',
>        debug => '1',
> ) ;
>
> my $sftp = Net::SFTP -> new('127.0.0.1', %sftpArgs) ;
> $sftp -> put("/etc/passwd", "/tmp") ;
>
> Here's what happens....
>
> [root@pnazlx236 ~]# perl test.pl
> pnazlx236.nat.teci.com: Reading configuration data /root/.ssh/config
> pnazlx236.nat.teci.com: Reading configuration data /etc/ssh_config
> pnazlx236.nat.teci.com: Allocated local port 1023.
> pnazlx236.nat.teci.com: Connecting to 127.0.0.1, port 22.
> pnazlx236.nat.teci.com: Remote protocol version 1.99, remote software 
> version OpenSSH_3.9p1
> pnazlx236.nat.teci.com: Net::SSH::Perl Version 1.28, protocol version 
> 2.0.
> pnazlx236.nat.teci.com: No compat match: OpenSSH_3.9p1.
> pnazlx236.nat.teci.com: Connection established.
> pnazlx236.nat.teci.com: Sent key-exchange init (KEXINIT), wait response.
> pnazlx236.nat.teci.com: Algorithms, c->s: 3des-cbc hmac-sha1 none
> pnazlx236.nat.teci.com: Algorithms, s->c: 3des-cbc hmac-sha1 none
> pnazlx236.nat.teci.com: Entering Diffie-Hellman Group 1 key exchange.
> pnazlx236.nat.teci.com: Sent DH public key, waiting for reply.
> pnazlx236.nat.teci.com: Received host key, type 'ssh-dss'.
> pnazlx236.nat.teci.com: Host '127.0.0.1' is known and matches the host 
> key.
> Not an ARRAY reference at /usr/lib/perl5/5.8.5/Math/BigInt/Calc.pm 
> line 968.
>
> what's with BigInt?
>
> I'm running RHEL4, kernel 2.6.9-11.ELsmp, perl 5.8 and modules 
> compiled from CPAN.
>
>
>
> -------------------------------------------------------
> SF.Net email is sponsored by: Discover Easy Linux Migration Strategies
> from IBM. Find simple to follow Roadmaps, straightforward articles,
> informative Webcasts and more! Get everything you need to get up to
> speed, fast. http://ads.osdn.com/?ad_id=7477&alloc_id=16492&op=click
> _______________________________________________
> Ssh-sftp-perl-users mailing list
> Ssh...@li...
> https://lists.sourceforge.net/lists/listinfo/ssh-sftp-perl-users
>

[Ssh-sftp-perl-users] Not an ARRAY reference at /usr/lib/perl5/5.8.5/Math/BigInt/Calc.pm line 968

[Steve N. <ste...@vi...>]

here's my script:

#!/usr/bin/perl

use strict ;
use lib '/opt/lib/perl' ;
use Net::SFTP qw(scp) ;

my %sftpArgs = (
                user => 'user',
                password => 'password',

        warn => '0',
        debug => '1',
) ;

my $sftp = Net::SFTP -> new('127.0.0.1', %sftpArgs) ;
$sftp -> put("/etc/passwd", "/tmp") ;

Here's what happens....

[root@pnazlx236 ~]# perl test.pl
pnazlx236.nat.teci.com: Reading configuration data /root/.ssh/config
pnazlx236.nat.teci.com: Reading configuration data /etc/ssh_config
pnazlx236.nat.teci.com: Allocated local port 1023.
pnazlx236.nat.teci.com: Connecting to 127.0.0.1, port 22.
pnazlx236.nat.teci.com: Remote protocol version 1.99, remote software 
version OpenSSH_3.9p1
pnazlx236.nat.teci.com: Net::SSH::Perl Version 1.28, protocol version 2.0.
pnazlx236.nat.teci.com: No compat match: OpenSSH_3.9p1.
pnazlx236.nat.teci.com: Connection established.
pnazlx236.nat.teci.com: Sent key-exchange init (KEXINIT), wait response.
pnazlx236.nat.teci.com: Algorithms, c->s: 3des-cbc hmac-sha1 none
pnazlx236.nat.teci.com: Algorithms, s->c: 3des-cbc hmac-sha1 none
pnazlx236.nat.teci.com: Entering Diffie-Hellman Group 1 key exchange.
pnazlx236.nat.teci.com: Sent DH public key, waiting for reply.
pnazlx236.nat.teci.com: Received host key, type 'ssh-dss'.
pnazlx236.nat.teci.com: Host '127.0.0.1' is known and matches the host key.
Not an ARRAY reference at /usr/lib/perl5/5.8.5/Math/BigInt/Calc.pm line 968.

what's with BigInt?

I'm running RHEL4, kernel 2.6.9-11.ELsmp, perl 5.8 and modules compiled 
from CPAN.

RE: [Ssh-sftp-perl-users] Slow Authentication

[Yishay W. <yis...@ho...>]

I'm having the same problem using. I ran your script and am having the same 
results using 5.8.7 on Red Hat Enterprise Linux AS release 3 (Taroon).

Using 5.8.4 on Windows XP your script runs quick and there's no problem.



>From: "Eric Langheinrich" <net...@er...>
>To: <ssh...@li...>
>Subject: [Ssh-sftp-perl-users] Slow Authentication
>Date: Mon, 4 Jul 2005 16:15:34 -0600
>
>I'm having some trouble with slow logins using Net::SSH::Perl. I've used 
>the module on other machines in the past and love what I can do with it, 
>but the slow authentication I'm seeing currently is a pain.
>
>I'm using Perl 5.8.0 with the latest versions of the modules downloaded 
>from CPAN. Machine is a dual XEON with 64 Bit Redhat Enterprise 3.1 
>installed. Tried installing using MCPAN and also manually downloading and 
>installing each module. Didn't seem to help.
>
>To try and narrow things down, I've put a little script together that 
>simply goes and performs an 'ls' on the remote machine.
>
>use strict;
>use Net::SSH::Perl;
>use vars qw($ssh);
>
>
>my @ident = ( "/home/user/.ssh/id_dsa");
>my %params = (
>         protocol => 2,
>         interactive => 0,
>         identity_files => [@ident],
>         debug => 1,
>         options => [
>                 "BatchMode yes",
>                 "AuthenticationSuccessMsg no",
>                 "ForwardX11 no",
>                 "ForwardAgent no"
>         ]
>);
>
>my $server = $ARGV[0];
>&sshconnect($server);
>my ($stdout, $stderr, $exit) = $ssh->cmd("ls");
>print "$stdout\n";
>if (! $ssh) {
>         print "Unable to establish ssh connection to: $server\n";
>} else {
>         print "Successfully established ssh connection to: $server\n";
>}
>
>sub sshconnect {
>         my $server = $_[0];
>         our $ssh = Net::SSH::Perl->new("$server", %params);
>         $ssh->login("user");
>}
>
>
>Output with the debug flag is as follows:
>
>d: Reading configuration data /root/.ssh/config
>d: Reading configuration data /etc/ssh_config
>d: Allocated local port 1022.
>d: Connecting to remote1, port 22.
>d: Remote protocol version 2.0, remote software version OpenSSH_3.6.1p2
>d: Net::SSH::Perl Version 1.28, protocol version 2.0.
>d: No compat match: OpenSSH_3.6.1p2.
>d: Connection established.
>d: Sent key-exchange init (KEXINIT), wait response.
>d: Algorithms, c->s: 3des-cbc hmac-sha1 none
>d: Algorithms, s->c: 3des-cbc hmac-sha1 none
>d: Entering Diffie-Hellman Group 1 key exchange.
>d: Sent DH public key, waiting for reply.
>d: Received host key, type 'ssh-dss'.
>d: Host 'remote1' is known and matches the host key.
>d: Computing shared secret key.
>d: Verifying server signature.
>d: Waiting for NEWKEYS message.
>d: Enabling incoming encryption/MAC/compression.
>d: Send NEWKEYS, enable outgoing encryption/MAC/compression.
>d: Sending request for user-authentication service.
>d: Service accepted: ssh-userauth.
>d: Trying empty user-authentication request.
>d: Authentication methods that can continue: 
>publickey,password,keyboard-interactive.
>d: Next method to try is publickey.
>d: Trying pubkey authentication with key file '/home/user/.ssh/id_dsa'
>d: Login completed, opening dummy shell channel.
>d: channel 0: new [client-session]
>d: Requesting channel_open for channel 0.
>d: channel 0: open confirm rwindow 0 rmax 32768
>d: Got channel open confirmation, requesting shell.
>d: Requesting service shell on channel 0.
>d: channel 1: new [client-session]
>d: Requesting channel_open for channel 1.
>d: Entering interactive session.
>d: Sending command: ls
>d: Requesting service exec on channel 1.
>d: channel 1: open confirm rwindow 0 rmax 32768
>d: input_channel_request: rtype exit-status reply 0
>d: channel 1: rcvd eof
>d: channel 1: output open -> drain
>d: channel 1: rcvd close
>d: channel 1: input open -> closed
>d: channel 1: close_read
>d: channel 1: obuf empty
>d: channel 1: output drain -> closed
>d: channel 1: close_write
>d: channel 1: send close
>d: channel 1: full closed
>authorized_keys
>sites
>
>Successfully established ssh connection to: remote1
>
>
>The delay seems to happen primarily in two places. First at the line: d: 
>Algorithms, s->c: 3des-cbc hmac-sha1 none
>which takes 10 seconds or so, then again at: d: Computing shared secret 
>key.
>
>Which again takes 10 or 15 seconds.
>
>Any help would be greatly appreciated. I'd like to not have to rewrite the 
>whole process to use Net::SSH

_________________________________________________________________
Express yourself instantly with MSN Messenger! Download today - it's FREE! 
http://messenger.msn.click-url.com/go/onm00200471ave/direct/01/

Re: [Ssh-sftp-perl-users] Pari Installation Problems

[nadim <na...@kh...>]

Pari has always been a pain to install.

How did you install?

What platform do you have?

have you installed Pari (the lib)? Where, by hand?

Did you try sudo cpan Math::Pari?


Cheers, Nadim.

On Wednesday 06 July 2005 00:11, Dambrosio, Steve wrote:
> I've having trouble with installation of the Pari.  Is this problem
> familiar to anyone?
>
> I installed the Pari to my home directory (my first mistake?):
>
> /home/myid/pari-2.1.6
>
> When I do a "build test" on Math::Pari I get the following errors:
>
> Can't load 'blib/arch/auto/Math/Pari/Pari.so' for module Math::Pari:
> blib/arch/auto/Math/Pari/Pari.so: undefined symbol: PERL_UNUSED_VAR at
> /usr/lib/perl5/5.6.1/i386-linux/DynaLoader.pm line 206.
>
>  at t/zz_leak.t line 17
>
> Compilation failed in require at t/zz_leak.t line 17.
>
> BEGIN failed--compilation aborted at t/zz_leak.t line 17.
>
> t/zz_leak...........dubious
>
>         Test returned status 255 (wstat 65280, 0xff00)
>
> Here is at (around) line 206 in
> /usr/lib/perl5/5.6.1/i386-linux/DynaLoader.pm:
>
>    # Many dynamic extension loading problems will appear to come from
>
>     # this section of code: XYZ failed at line 123 of DynaLoader.pm.
>
>     # Often these errors are actually occurring in the initialisation
>
>     # C code of the extension XS file. Perl reports the error as being
>
>     # in this perl code simply because this was the last perl code
>
>     # it executed.
>
>     my $libref = dl_load_file($file, $module->dl_load_flags) or
>
>         croak("Can't load '$file' for module $module: ".dl_error());
>
> Ignoring the above, I get the following errors when I try
> Net::SSH::Perl:
>
> /usr/bin/perl: relocation error:
> /home/aesdh1g/perllib/lib/site_perl/5.6.1/i386-linux/auto/Math/Pari/Pari
> .so: undefined symbol: PERL_UNUSED_VAR
>
> ** Thank's for any help **
>
> BM__MailAutoSigSteve Dambrosio
> McKesson Corporation
> * (415) 983-8773
> * ste...@mc...

[Ssh-sftp-perl-users] Pari Installation Problems

[Dambrosio, S. <Ste...@Mc...>]

I've having trouble with installation of the Pari.  Is this problem
familiar to anyone?  

I installed the Pari to my home directory (my first mistake?):

/home/myid/pari-2.1.6

When I do a "build test" on Math::Pari I get the following errors:

Can't load 'blib/arch/auto/Math/Pari/Pari.so' for module Math::Pari:
blib/arch/auto/Math/Pari/Pari.so: undefined symbol: PERL_UNUSED_VAR at
/usr/lib/perl5/5.6.1/i386-linux/DynaLoader.pm line 206.

 at t/zz_leak.t line 17

Compilation failed in require at t/zz_leak.t line 17.

BEGIN failed--compilation aborted at t/zz_leak.t line 17.

t/zz_leak...........dubious

        Test returned status 255 (wstat 65280, 0xff00)

Here is at (around) line 206 in
/usr/lib/perl5/5.6.1/i386-linux/DynaLoader.pm:

   # Many dynamic extension loading problems will appear to come from

    # this section of code: XYZ failed at line 123 of DynaLoader.pm.

    # Often these errors are actually occurring in the initialisation

    # C code of the extension XS file. Perl reports the error as being

    # in this perl code simply because this was the last perl code

    # it executed.

    my $libref = dl_load_file($file, $module->dl_load_flags) or

        croak("Can't load '$file' for module $module: ".dl_error());

Ignoring the above, I get the following errors when I try
Net::SSH::Perl:

/usr/bin/perl: relocation error:
/home/aesdh1g/perllib/lib/site_perl/5.6.1/i386-linux/auto/Math/Pari/Pari
.so: undefined symbol: PERL_UNUSED_VAR

** Thank's for any help **

BM__MailAutoSigSteve Dambrosio
McKesson Corporation
* (415) 983-8773
* ste...@mc... 

[Ssh-sftp-perl-users] Slow Authentication

[Eric L. <net...@er...>]

I'm having some trouble with slow logins using Net::SSH::Perl. I've used =
the module on other machines in the past and love what I can do with it, =
but the slow authentication I'm seeing currently is a pain.=20

I'm using Perl 5.8.0 with the latest versions of the modules downloaded =
from CPAN. Machine is a dual XEON with 64 Bit Redhat Enterprise 3.1 =
installed. Tried installing using MCPAN and also manually downloading =
and installing each module. Didn't seem to help.=20

To try and narrow things down, I've put a little script together that =
simply goes and performs an 'ls' on the remote machine.=20

use strict;
use Net::SSH::Perl;
use vars qw($ssh);


my @ident =3D ( "/home/user/.ssh/id_dsa");
my %params =3D (
        protocol =3D> 2,
        interactive =3D> 0,
        identity_files =3D> [@ident],
        debug =3D> 1,
        options =3D> [
                "BatchMode yes",
                "AuthenticationSuccessMsg no",
                "ForwardX11 no",
                "ForwardAgent no"
        ]
);

my $server =3D $ARGV[0];
&sshconnect($server);
my ($stdout, $stderr, $exit) =3D $ssh->cmd("ls");
print "$stdout\n";
if (! $ssh) {
        print "Unable to establish ssh connection to: $server\n";
} else {
        print "Successfully established ssh connection to: $server\n";
}

sub sshconnect {
        my $server =3D $_[0];
        our $ssh =3D Net::SSH::Perl->new("$server", %params);
        $ssh->login("user");
}


Output with the debug flag is as follows:

d: Reading configuration data /root/.ssh/config
d: Reading configuration data /etc/ssh_config
d: Allocated local port 1022.
d: Connecting to remote1, port 22.
d: Remote protocol version 2.0, remote software version OpenSSH_3.6.1p2
d: Net::SSH::Perl Version 1.28, protocol version 2.0.
d: No compat match: OpenSSH_3.6.1p2.
d: Connection established.
d: Sent key-exchange init (KEXINIT), wait response.
d: Algorithms, c->s: 3des-cbc hmac-sha1 none
d: Algorithms, s->c: 3des-cbc hmac-sha1 none
d: Entering Diffie-Hellman Group 1 key exchange.
d: Sent DH public key, waiting for reply.
d: Received host key, type 'ssh-dss'.
d: Host 'remote1' is known and matches the host key.
d: Computing shared secret key.
d: Verifying server signature.
d: Waiting for NEWKEYS message.
d: Enabling incoming encryption/MAC/compression.
d: Send NEWKEYS, enable outgoing encryption/MAC/compression.
d: Sending request for user-authentication service.
d: Service accepted: ssh-userauth.
d: Trying empty user-authentication request.
d: Authentication methods that can continue: =
publickey,password,keyboard-interactive.
d: Next method to try is publickey.
d: Trying pubkey authentication with key file '/home/user/.ssh/id_dsa'
d: Login completed, opening dummy shell channel.
d: channel 0: new [client-session]
d: Requesting channel_open for channel 0.
d: channel 0: open confirm rwindow 0 rmax 32768
d: Got channel open confirmation, requesting shell.
d: Requesting service shell on channel 0.
d: channel 1: new [client-session]
d: Requesting channel_open for channel 1.
d: Entering interactive session.
d: Sending command: ls
d: Requesting service exec on channel 1.
d: channel 1: open confirm rwindow 0 rmax 32768
d: input_channel_request: rtype exit-status reply 0
d: channel 1: rcvd eof
d: channel 1: output open -> drain
d: channel 1: rcvd close
d: channel 1: input open -> closed
d: channel 1: close_read
d: channel 1: obuf empty
d: channel 1: output drain -> closed
d: channel 1: close_write
d: channel 1: send close
d: channel 1: full closed
authorized_keys
sites

Successfully established ssh connection to: remote1


The delay seems to happen primarily in two places. First at the line: d: =
Algorithms, s->c: 3des-cbc hmac-sha1 none
which takes 10 seconds or so, then again at: d: Computing shared secret =
key.=20

Which again takes 10 or 15 seconds.=20

Any help would be greatly appreciated. I'd like to not have to rewrite =
the whole process to use Net::SSH

[Ssh-sftp-perl-users] Calc.pm

[<Fra...@gl...>]

Hello,
I want my perl program to connect to a server using SSH.
I want to connect to remote servers I've never been before.
In fact, the program's aim will be to copy a public key on several =
remote servers. Here is the error raised by perl : Not an ARRAY =
reference at /usr/local/share/perl/5.8.4/Math/BigInt/Calc.pm line 222. =
As far as I am concerned I had lots of difficulties to get the =
Net:SSH:perl lib to compile through the cpan shell.
Here is my code :
$adresse_ip=3D"192.168.100.54";
$user=3D"user";
$pass=3D"xxxx";
$params{debug} =3D 1;
$params{interactive} =3D 0;
$params{protocol} =3D '2,1';

$ssh =3D Net::SSH::Perl->new($adresse_ip,%params,options =3D>["BatchMode =
yes","RhostsRSAAuthentication no"]); $ssh->login($user, $pass); =
($stdout, $stderr, $exit) =3D $ssh->cmd("ls");
print $stdout;
print $stderr;
print $exit;
Here is the debug output :=20
Reading configuration data /home/kudjat/.ssh/config
Reading configuration data /etc/ssh_config
Connecting to 195.110.248.210, port 22.
Remote protocol version 2.0, remote software version OpenSSH_3.7.1p1 =
Net::SSH::Perl Version 1.28, protocol version 2.0. No compat match: =
OpenSSH_3.7.1p1. 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 '195.110.248.210' is known and matches the =
host key. Not an ARRAY reference at =
/usr/local/share/perl/5.8.4/Math/BigInt/Calc.pm line 222.

Many thanks for your help.
Regards,
Fran=E7ois
PS : I am running perl on a Debian 2.4.27-1-386
Perl version is 5.8.4
CPAN version is 1.7601
Net::SSH::Perl Version 1.28, protocol version 2.0.

[Ssh-sftp-perl-users] 'copy' is not a Pari function name

[Steve N. <ste...@vi...>]

Has anyone seen this before? What gives?

`copy' is not a Pari function name at
/usr/lib/perl5/site_perl/5.8.5/i386-linux-thread-multi/Math/Pari.pm line 
973, <GEN0> line 1.

RE: [Ssh-sftp-perl-users] sock->blocking(0) Can't set socket non-blocking

[Stengel, R. <rol...@sa...>]

Hi,

unfortunatly i cannot switch to 5.8.=20

nevertheless thanks for your support

Regards
Roland

-----Original Message-----
From: ssh...@li...
[mailto:ssh...@li...] On Behalf Of
Yishay Weiss
Sent: Montag, 27. Juni 2005 16:09
To: ssh...@li...
Subject: RE: [Ssh-sftp-perl-users] sock->blocking(0) Can't set socket
non-blocking

>
>Do you have any further information about the bug you mentioned?
>

I guess it's not exactly the same bug, see

http://search.cpan.org/src/DBROBINS/Net-SSH-Perl-1.28/Changes

Anyway, I installed Net::SSH::W32Perl (which uses Net::SSH::Perl) on
Perl=20
5.8 and have not had the problems you describe. Dunno if it's a 5.6 ->
5.8=20
thing.

You might want take a look at:

http://www.soulcage.net/ppds/

On 5.8 there's an issue with Math-Pari which needs to be installed from
some=20
other repository:

ppm install http://theoryx5.uwinnipeg.ca/ppms/Math-Pari.ppd

But dunno about 5.6.

_________________________________________________________________
FREE pop-up blocking with the new MSN Toolbar - get it now!=20
http://toolbar.msn.click-url.com/go/onm00200415ave/direct/01/



-------------------------------------------------------
SF.Net email is sponsored by: Discover Easy Linux Migration Strategies
from IBM. Find simple to follow Roadmaps, straightforward articles,
informative Webcasts and more! Get everything you need to get up to
speed, fast. =
http://ads.osdn.com/?ad_id=3D7477&alloc_id=3D16492&op=3Dclick
_______________________________________________
Ssh-sftp-perl-users mailing list
Ssh...@li...
https://lists.sourceforge.net/lists/listinfo/ssh-sftp-perl-users

RE: [Ssh-sftp-perl-users] sock->blocking(0) Can't set socket non-blocking

[Yishay W. <yis...@ho...>]

>
>Do you have any further information about the bug you mentioned?
>

I guess it's not exactly the same bug, see

http://search.cpan.org/src/DBROBINS/Net-SSH-Perl-1.28/Changes

Anyway, I installed Net::SSH::W32Perl (which uses Net::SSH::Perl) on Perl 
5.8 and have not had the problems you describe. Dunno if it's a 5.6 -> 5.8 
thing.

You might want take a look at:

http://www.soulcage.net/ppds/

On 5.8 there's an issue with Math-Pari which needs to be installed from some 
other repository:

ppm install http://theoryx5.uwinnipeg.ca/ppms/Math-Pari.ppd

But dunno about 5.6.

_________________________________________________________________
FREE pop-up blocking with the new MSN Toolbar – get it now! 
http://toolbar.msn.click-url.com/go/onm00200415ave/direct/01/

RE: [Ssh-sftp-perl-users] sock->blocking(0) Can't set socket non-blocking

[Stengel, R. <rol...@sa...>]

Thank you for your immediate response.

No, I do not use Net::SSH::W32Perl. I took the CPAN package=20

	Net-SSH-Perl-1.28

And some related modules listed in=20

=09
http://www.cpan.org/modules/by-module/Net/Net-SSH-Perl-1.28.readme


Do you have any further information about the bug you mentioned?

Thanks
Regards
Roland


-----Original Message-----
From: ssh...@li...
[mailto:ssh...@li...] On Behalf Of
Yishay Weiss
Sent: Montag, 27. Juni 2005 15:02
To: ssh...@li...
Subject: RE: [Ssh-sftp-perl-users] sock->blocking(0) Can't set socket
non-blocking

1) Are you using Net::SSH::W32Perl ?

Might be a good idea if you're not

2) Are you using the latest version of Net::SSH::W32Perl ?

I think what you described was a bug that was fixed in the latest
version of=20
Net::SSH::Perl

>From: "Stengel, Roland" <rol...@sa...>
>To: <ssh...@li...>
>Subject: [Ssh-sftp-perl-users] sock->blocking(0) Can't set socket=20
>non-blocking
>Date: Mon, 27 Jun 2005 14:52:26 +0200
>
>Hi,
>
>I try to use Net::SSH on Windows XP, Perl 5.6.1. On opening a
connection
>the Net::SSH::Perl.pm fails:
>
>	P102414: Reading configuration data /.ssh/config
>	P102414: Reading configuration data /etc/ssh_config
>	P102414: Connecting to unix, port 22.
>	P102414: Remote protocol version 1.99, remote software version
>OpenSSH_3.6p1
>	P102414: Net::SSH::Perl Version 1.28, protocol version 1.5.
>	P102414: No compat match: OpenSSH_3.6p1.
>	Can't set socket non-blocking:  at
>C:/perl/site/lib/Net/SSH/Perl.pm line 216, <GEN0> line
>	 1.
>
>I commented the blocking statement out
>
>#    defined($sock->blocking(0))
>#       or die "Can't set socket non-blocking: $!";
>
>And it worked then. I wonder, since the non-blocking mode should work
on
>a system which struggles using threads.
>
>I appreciate any help.
>
>Thanks
>Regards
>Roland
>CSN Component : XX-INT-TOOLS-JAPRO
>Team email address : DL_JAPRO_SUPPORT <mailto:DL_...@sa...>
>
>

_________________________________________________________________
Don't just search. Find. Check out the new MSN Search!=20
http://search.msn.click-url.com/go/onm00200636ave/direct/01/



-------------------------------------------------------
SF.Net email is sponsored by: Discover Easy Linux Migration Strategies
from IBM. Find simple to follow Roadmaps, straightforward articles,
informative Webcasts and more! Get everything you need to get up to
speed, fast. =
http://ads.osdn.com/?ad_id=3D7477&alloc_id=3D16492&op=3Dclick
_______________________________________________
Ssh-sftp-perl-users mailing list
Ssh...@li...
https://lists.sourceforge.net/lists/listinfo/ssh-sftp-perl-users

RE: [Ssh-sftp-perl-users] sock->blocking(0) Can't set socket non-blocking

[Yishay W. <yis...@ho...>]

1) Are you using Net::SSH::W32Perl ?

Might be a good idea if you're not

2) Are you using the latest version of Net::SSH::W32Perl ?

I think what you described was a bug that was fixed in the latest version of 
Net::SSH::Perl

>From: "Stengel, Roland" <rol...@sa...>
>To: <ssh...@li...>
>Subject: [Ssh-sftp-perl-users] sock->blocking(0) Can't set socket 
>non-blocking
>Date: Mon, 27 Jun 2005 14:52:26 +0200
>
>Hi,
>
>I try to use Net::SSH on Windows XP, Perl 5.6.1. On opening a connection
>the Net::SSH::Perl.pm fails:
>
>	P102414: Reading configuration data /.ssh/config
>	P102414: Reading configuration data /etc/ssh_config
>	P102414: Connecting to unix, port 22.
>	P102414: Remote protocol version 1.99, remote software version
>OpenSSH_3.6p1
>	P102414: Net::SSH::Perl Version 1.28, protocol version 1.5.
>	P102414: No compat match: OpenSSH_3.6p1.
>	Can't set socket non-blocking:  at
>C:/perl/site/lib/Net/SSH/Perl.pm line 216, <GEN0> line
>	 1.
>
>I commented the blocking statement out
>
>#    defined($sock->blocking(0))
>#       or die "Can't set socket non-blocking: $!";
>
>And it worked then. I wonder, since the non-blocking mode should work on
>a system which struggles using threads.
>
>I appreciate any help.
>
>Thanks
>Regards
>Roland
>CSN Component : XX-INT-TOOLS-JAPRO
>Team email address : DL_JAPRO_SUPPORT <mailto:DL_...@sa...>
>
>

_________________________________________________________________
Don’t just search. Find. Check out the new MSN Search! 
http://search.msn.click-url.com/go/onm00200636ave/direct/01/