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 >

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 define

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 LW

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 (exi

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 r

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 l

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 tha

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 clo

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... Enter the hostname to view the configuraqtion file perl script... #!/usr/local/bin/perl -w use CGI qw(:all); $s=CGI::param('host'); $s = qu

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"; > >

why doesn't this work

2001-09-03 Thread dan radom
I'm very new to perl. I have been trying to reweite some of my shell scripts to learn the language. Here's what I've got... #!/usr/local/bin/perl -w if ( $#ARGV+1 !=2 ) { print "\n"; print "usage cat.pl port up\/down\n"; print "\n"; exit; } chomp( $port = $ARG