> Thanks for the reply Dan, the two remote servers do not have > FTP running on them, so they must initialize the FTP
Nuts! > connection. I've now built the scripts on their ends, I'm > working on an SSH script that will login to them and launch > the scripts on each server. Got the traffic direction thing > going on, so I'm trying to figure out who can login where? Here's a nutty idea if permissions allow: pu the ftp script on one servers and call it via http(s) instead of ssh I do that to update certain files across multiple places: - submit a form that modifies a local file - then it ftp's the new file to several servers giving me status on each one so if it fails I can do it by hand Not sure if that will help or not but you never know! Of course ssh is cool too so either way I'm happy! DMuey > I'll post the results once they all work. Right in the middle > of all this, my primary server got upgraded to 5.6.1 so we'll > see how that messes everything up? Ever forward. > > Mark-Nathaniel Weisman > President / Owner > Outland Domain Group > Anchorage, Alaska > > > > -----Original Message----- > From: Dan Muey [mailto:[EMAIL PROTECTED] > Sent: Tuesday, December 02, 2003 6:38 AM > To: [EMAIL PROTECTED] > Subject: RE: Net::SSH and Net::FTP? > > > > > > > > I would like to use SSH to login to a remote system, then > > using FTP, > > > upload a file from the remote machine to another machine > which will > > > display the data. If I can automate this process, I think > > I'll be in > > > great shape, tell me does this code seem like it would work > > for this? > > Just a thought, if you're having trouble with the ssh part. > > You could just use ftp for both servers? > > use Net::FTP; > > $ftpa = Net::FTP->new("a.host.name", Debug => 0) > or die "Cannot connect to a.host.name: $@"; > $ftpb = Net::FTP->new("b.host.name", Debug => 0) > or die "Cannot connect to b.host.name: $@"; > > $ftpa->login($usera,$passa) > or die "Cannot login to A", $ftp->message; > $ftpb->login($userb,$passb) > or die "Cannot login to B", $ftp->message; > > $ftpa->cwd("/files/blah") > or die "Cannot change working directory A", $ftp->message; > $ftpb->cwd("/foo/monkey") > or die "Cannot change working directory B", $ftp->message; > > for(@filestotransfer) { > # then use $ftpa->read() and $ftpb->write() to xfr them > between each other, > # sorry for lack of example I'm a bit busy! > } > > $ftpa->quit; > $ftpb->quit; > > Transfer files back and forth between the 2 Net::FTP objects. I'm not > saying it's better or anythgin, just another way to do it > that may help > if ssh is being tricky as it some times can. > > HTH > > DMuey > > -- > To unsubscribe, e-mail: [EMAIL PROTECTED] > For additional commands, e-mail: [EMAIL PROTECTED] > > > -- > To unsubscribe, e-mail: [EMAIL PROTECTED] > For additional commands, e-mail: [EMAIL PROTECTED] > > -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]