Net::Telnet

2003-08-16 Thread Gupta, Sharad
Hi All, I have a small script like this: --- use strict; use Net::Telnet; my $host = "Wilma"; my $username = "Foo"; my $pass = "Bar"; my $s = Net::Telnet->new( Host=>$host, input_log => "input_log",

Re: Perl script to ssh to other machine.

2003-08-16 Thread Titu Kim
Hi, Thanks for your reply. My purpose is not only to run uptime. I need to write a script to log into other machines to grep the log file contents. Now, I log in one by one and grep the log. I want to use the script to log into all machine automatically to do this job. Do you have any suggestion

Cron jobs and perl

2003-08-16 Thread Trina Espinoza
Can someone tell me how to go about running a cron job with perl? Here's what I have thus far: 1) I have a cron job: 04 09 * * 1-7 /cygdrive/c/Documents\ and\ Settings/trina.espinoza/Show_Tools/perlfile.sh 53 08 * * 1-7 /var/cron/perlfile.sh 2) I have a perlfile: #!/usr/bin/sh touch /tmp/cr

Re: Please don't say RTFM

2003-08-16 Thread Jeff 'japhy' Pinyan
On Aug 16, Ramprasad said: >open IN , $inputfile || die "COuldnot open in file\n"; A see many things unfavorable here. Because you're using the || operator, the only time die() will be called is if $inputfile is a false value. You haven't included the filename nor $! in the error message, and I

RE: Please don't say RTFM

2003-08-16 Thread ged.per
For a good online tutorial try this http://www.sthomas.net/roberts-perl-tutorial.htm Its well written and easy to follow. Plus it was written for perl users on windows machines. If you want to shell out a bit of cash, start by getting Learning Perl http://www.oreilly.com/catalog/lperl3 This is pro

Re: Script chokes on various file formats.

2003-08-16 Thread Ramprasad
Trina Espinoza wrote: I am starting to write a lot of scripts that require a user to input a file that my script processes for data. Since there are may file formats rtf, txt, microsoft word, etc, my scripts have often choked when users submit the data in various file formats. I need something to

Re: Script help

2003-08-16 Thread Ramprasad
Keith Olmstead wrote: Hello, I am neeing some help on a script that I am writing. Here is what I have so far: my $startdir = "/opt/log/hosts/"; use File::Find; #use strict; use warnings; my @dirlist; @logfile = ("cron","messages","maillog","ldap"); foreach $log (@logfile) { sub eachFile { if

Re: Please don't say RTFM

2003-08-16 Thread Ramprasad
Robert Mark White wrote: Dear Gentle Readers, Please be gentle with me as this is only my first day trying to learn perl. I am using an online tutorial, however it must be written for *nix and I am trying to use it on win32. man perl does not even work. I have already found some other differences.

Re: Please don't say RTFM

2003-08-16 Thread Tassilo von Parseval
On Fri, Aug 15, 2003 at 11:44:04PM -0600 Robert Mark White wrote: > Please be gentle with me as this is only my first day trying to learn perl. > I am using an online tutorial, however it must be written for *nix and I am > trying to use it on win32. > man perl does not even work. We'll come to t

Please don't say RTFM

2003-08-16 Thread Robert Mark White
Dear Gentle Readers, Please be gentle with me as this is only my first day trying to learn perl. I am using an online tutorial, however it must be written for *nix and I am trying to use it on win32. man perl does not even work. I have already found some other differences. For example, the tutori