[32066] in Perl-Users-Digest
Perl-Users Digest, Issue: 3330 Volume: 11
daemon@ATHENA.MIT.EDU (Perl-Users Digest)
Thu Mar 24 06:09:22 2011
Date: Thu, 24 Mar 2011 03:09:09 -0700 (PDT)
From: Perl-Users Digest <Perl-Users-Request@ruby.OCE.ORST.EDU>
To: Perl-Users@ruby.OCE.ORST.EDU (Perl-Users Digest)
Perl-Users Digest Thu, 24 Mar 2011 Volume: 11 Number: 3330
Today's topics:
Re: File::Slurp 9999.14 is released <tadmc@seesig.invalid>
Re: Perl script running external command <justin.1102@purestblue.com>
Digest Administrivia (Last modified: 6 Apr 01) (Perl-Users-Digest Admin)
----------------------------------------------------------------------
Date: Wed, 23 Mar 2011 22:37:48 -0500
From: Tad McClellan <tadmc@seesig.invalid>
Subject: Re: File::Slurp 9999.14 is released
Message-Id: <slrnioler2.tbr.tadmc@tadbox.sbcglobal.net>
["Followup-To:" header set to comp.lang.perl.misc.]
Uno <Uno@example.invalid> wrote:
> You keep on posting this.
It was posted once.
What are you talking about?
> If you don't think this is boring then you've
> never seen a bad movie.
I think you have finally worn down my tolerance. So long.
--
Tad McClellan
email: perl -le "print scalar reverse qq/moc.liamg\100cm.j.dat/"
The above message is a Usenet post.
I don't recall having given anyone permission to use it on a Web site.
------------------------------
Date: Thu, 24 Mar 2011 09:22:48 +0000
From: Justin C <justin.1102@purestblue.com>
Subject: Re: Perl script running external command
Message-Id: <84fr58-3id.ln1@zem.masonsmusic.co.uk>
On 2011-03-23, ccc31807 <cartercc@gmail.com> wrote:
> The call looks something like this:
> sub get_app_file
> {
> my $success = system './pscp -p -pw password username@12.34.56.78/
> directory/path/filename*.txt .';
> if ($success == 0) { $log .= "Successfully downloaded application
> file.\n"; }
> else { $log .= "PROBLEM WITH downloaded application file.\n"; }
> }
>
> The hardware guys are updating the servers, and I am in the process of
> moving these scripts to a new machine. A week ago, the download
> function worked, and today I can run it by hand -- BUT the script
> fails with this error message:
> ‘Fatal: Network error: Connection timed out’
Maybe they've done something with ssh?
What happens if you, from the command line, "ssh username@[dottedquad]"?
I would expect a very similar error.
Can you still ping that IP?
I'm no newtwork expert, but that's what I'd start with.
If you can't ssh into the box then you're not going to be able to scp
either, pscp is just an scp wrapper/clone (PuTTY for anyone not
familiar). At least you'll have something with which to go to the
hardware guys, and put the problem back in their court.
Justin.
--
Justin C, by the sea.
------------------------------
Date: 6 Apr 2001 21:33:47 GMT (Last modified)
From: Perl-Users-Request@ruby.oce.orst.edu (Perl-Users-Digest Admin)
Subject: Digest Administrivia (Last modified: 6 Apr 01)
Message-Id: <null>
Administrivia:
To submit articles to comp.lang.perl.announce, send your article to
clpa@perl.com.
Back issues are available via anonymous ftp from
ftp://cil-www.oce.orst.edu/pub/perl/old-digests.
#For other requests pertaining to the digest, send mail to
#perl-users-request@ruby.oce.orst.edu. Do not waste your time or mine
#sending perl questions to the -request address, I don't have time to
#answer them even if I did know the answer.
------------------------------
End of Perl-Users Digest V11 Issue 3330
***************************************
