foreach loop problems

2002-02-13 Thread dan radom
Hi, I've got a problem with the following code... my @hosts=qw( lunar solar venus mars saturn pluto ); foreach (\@hosts) { system(/usr/bin/ssh @hosts $ARGV[0]); } What I'm wanting to do is call foo.pl uname (for example) and have the script ssh host uname for each host defined

Re: foreach loop problems

2002-02-13 Thread dan radom
I've set SSH_AUTH_SOCK and SSH_AGENT_PID environment variables so the script can run from cron, but there is no password prompt with ssh-agent and hostkey authentication. an * Johnathan Kupferer ([EMAIL PROTECTED]) wrote: I was actually surprised to see that ssh worked like this! I don't

LWP timeouts

2001-12-16 Thread dan radom
Can anyone tell me why this timeout isn't working? The script dies at the time interval I set, but it completely ignores the getopts arguments. If I only use LWP::Simple everything works, but the default 3 minute timeout is too long. Dan use LWP::Simple qw(get $ua); $ua-timeout(25); #use

Getopt::Std problem

2001-12-15 Thread dan radom
I'm having a problem with Getopt. If I pass the -p option the script uses the proxy as it should. If i pass it -p -o it ignores the unless (exists($args{o})) and writes to $outfile anyway. Any idea why it's doing that? dan use LWP::Simple; use Getopt::Std; getopt('o:p', \%args); if

Re: Off-Topic (200%) - Where are you from?

2001-11-09 Thread dan radom
boulder, colorado * Etienne Marcotte ([EMAIL PROTECTED]) wrote: By reading the messages everyday I can guess most of us are from United States right? And since there are not a lot of messages in (my) morning time, probably means most are from the west coast (different timezone). Am I

Re: Defining Global Variables w/use strict;

2001-11-08 Thread dan radom
just a thought, but how can you print a variable that hasn't been defined yet? dan * Tomasi, Chuck ([EMAIL PROTECTED]) wrote: System: Sun Ultra 2, Solaris 7 (11/99) Perl: 5.6.0 I have a series of related programs that need global definitions ($DOMAIN, $ADMIN, $DBNAME, etc). My code looks

Re: Using Perl to contol an FTP session

2001-10-24 Thread dan radom
dan mentioned expect which does work fine, but i've been much more successful with the perl Expect.pm. it's more reliable for some reason, and much faster then plain old vanilla expect. dan * Eddie T Kayes ([EMAIL PROTECTED]) wrote: I want to control an ftp session with a Perl script so

newbie cgi problem

2001-10-18 Thread dan radom
I'm trying to print the contents of a file which is being passed from a html form. I'm pretty close (I think). Here's what I have... html form... form method=post action=/cgi-bin/smsconfview.pl Enter the hostname to view the configuraqtion file br input size=50 name=host brbr input type

Re: newbie cgi problem

2001-10-18 Thread dan radom
thanks too all who replied. i knew i was close. i can't believe i missed the extra on line 7. duh. thanks everyone! dan * dan radom ([EMAIL PROTECTED]) wrote: I'm trying to print the contents of a file which is being passed from a html form. I'm pretty close (I think). Here's what I

Re: why doesn't this work

2001-09-03 Thread dan radom
Thanks. That got it. dan * Jeff 'japhy/Marillion' Pinyan ([EMAIL PROTECTED]) wrote: On Sep 3, dan radom said: if ( $#ARGV+1 !=2 ) { That's better written as: if (@ARGV != 2) { print \n; print usage cat.pl port up\/down\n; print \n; exit