Re: Execute the Linux command on remote machine

2008-08-13 Thread Rodrick Brown
On Wed, Aug 13, 2008 at 8:14 AM, Thomas Lovell <[EMAIL PROTECTED]>wrote: > > On Aug 13, 2008, at 4:25 AM, Irfan J Sayed (isayed) wrote: > > Hi All, >> >> I want to execute one command on remote Linux machine. >> >> Following is the perl code. >> >> #! /usr/bin/perl; >> >> # perl module to parse t

Re: Execute the Linux command on remote machine

2008-08-13 Thread Thomas Lovell
On Aug 13, 2008, at 4:25 AM, Irfan J Sayed (isayed) wrote: Hi All, I want to execute one command on remote Linux machine. Following is the perl code. #! /usr/bin/perl; # perl module to parse the Install.log file for errors use lib "/tmp/"; use Net::SSH::Perl; my $ssh = Net::SSH::Perl->n

Re: Help on string manip

2008-08-13 Thread Dr.Ruud
"DeeDee Messersmith" schreef: > I have strings such as the following: > > .INSERT,SCREW THREAD.. > > I need the leading dots but not the trailing. As you see it has > commas and spaces in it so the traditional \w doesn't work. the .* > doesn't work as it picks up the trailing dots. T

Re: Not able to open a file.

2008-08-13 Thread John W. Krahn
jis wrote: Hi Hello, I simply could not open a file which is in the same path as my script is. i could open the file if i explicitly mention the path. but i dont want that.. my script is.. use strict; use warnings; my $fil="pdef.txt"; open(DEFILE,"<$fil")|| die "Couldnt open pdef file -

Re: Not able to open a file.

2008-08-13 Thread Mr. Shawn H. Corey
On Wed, 2008-08-13 at 03:12 -0700, jis wrote: > Hi > > I simply could not open a file which is in the same path as my script > is. > i could open the file if i explicitly mention the path. but i dont > want that.. > > my script is.. > > use strict; > use warnings; > my $fil="pdef.txt"; > open

Not able to open a file.

2008-08-13 Thread jis
Hi I simply could not open a file which is in the same path as my script is. i could open the file if i explicitly mention the path. but i dont want that.. my script is.. use strict; use warnings; my $fil="pdef.txt"; open(DEFILE,"<$fil")|| die "Couldnt open pdef file - $!\n"; Any idea what

Re: String

2008-08-13 Thread Mr. Shawn H. Corey
On Tue, 2008-08-12 at 23:56 -0700, Arun wrote: > Hi, >As i am new to perl i just wanted to define a string with the > current date and time. > For example: > current_date-current_time::Arun::current_date,current_time,Prakash > > so how do i define this string.. > > The simplest way

Re: peer to peer programming

2008-08-13 Thread Mr. Shawn H. Corey
On Wed, 2008-08-13 at 20:45 +0300, Octavian Rasnita wrote: > Hi, > > Does anyone know where I could find information about creating peer to peer > applications in perl? > (Like messengers that don't require a base server...) > > If it is possible to do it in perl, please tell me where I can find

peer to peer programming

2008-08-13 Thread Octavian Rasnita
Hi, Does anyone know where I could find information about creating peer to peer applications in perl? (Like messengers that don't require a base server...) If it is possible to do it in perl, please tell me where I can find more about it if you know. Thank you. Octavian -- To unsubscribe

Re: Extracting data from log and reformating

2008-08-13 Thread Kashif Salman
On Wed, Aug 13, 2008 at 10:05 AM, John W. Krahn <[EMAIL PROTECTED]> wrote: > Kashif Salman wrote: > >> Greetings, >> > > Hello, > > I have a log file like so, and I am trying to get the date on the next >> line >> after "Start..." line. So for the log below I'd like to get the output >> >> 04/06/

String

2008-08-13 Thread Arun
Hi, As i am new to perl i just wanted to define a string with the current date and time. For example: current_date-current_time::Arun::current_date,current_time,Prakash so how do i define this string.. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMA

Re: strange issue while using DBI module

2008-08-13 Thread Mr. Shawn H. Corey
On Wed, 2008-08-13 at 02:32 -0700, Debraj wrote: > Hi > > The script ( mentioned below ) works fine if I do a > > setenv LD_LIBRARY_PATH /OracleProd/oracle9i/lib/ > > before executing the script. But if I don't do that instead put it > within the script like : > > > $ENV{'LD_LIBRARY_PATH'} = "

Re: clock in perl

2008-08-13 Thread freefox
On 12 Aug, 10:01, [EMAIL PROTECTED] ([EMAIL PROTECTED]) wrote: > can any body tell me how to make clock in perl/mason You have to be more specific about what you are trying to accomplish. Try to start out at http://perldoc.perl.org and see what you can find. Best regards. -- To unsubsc

strange issue while using DBI module

2008-08-13 Thread Debraj
Hi The script ( mentioned below ) works fine if I do a setenv LD_LIBRARY_PATH /OracleProd/oracle9i/lib/ before executing the script. But if I don't do that instead put it within the script like : $ENV{'LD_LIBRARY_PATH'} = "/OracleProd/oracle9i/lib"; it throws this error : DBI version is -->

Re: Net::Telnet

2008-08-13 Thread Hashmat Khan
> >>> I get this error: > >>> maximum input buffer length exceeded: 1048576 bytes at D:\Docs\Perl > >>> \scripts\ > >>> ti_p2k_bld.pl line 33 > > >>> This could be because $prematch is gets a very big string and so it > >>> exceeds the limit which I had suspected before. > >>> Bottomline, I want t

Re: Extracting data from log and reformating

2008-08-13 Thread John W. Krahn
Kashif Salman wrote: Greetings, Hello, I have a log file like so, and I am trying to get the date on the next line after "Start..." line. So for the log below I'd like to get the output 04/06/05 05/06/05 06/06/05 But I also need to re-format that so the end result becomes: 2005-04-06 2005-

Extracting data from log and reformating

2008-08-13 Thread Kashif Salman
Greetings, I have a log file like so, and I am trying to get the date on the next line after "Start..." line. So for the log below I'd like to get the output 04/06/05 05/06/05 06/06/05 But I also need to re-format that so the end result becomes: 2005-04-06 2005-05-06 2005-06-06 Any hints? M

Re: Consult about XS

2008-08-13 Thread Pablo Zea Aranibar
Hi, Really thanks for your answer, yes the second one doesnt compile because of some error typos like 'if ($elements=>{$elm})', without the hash variable ($elements) it works, But also, you are right, your code is faster than mine, :D Again thanks for your answer. Regards, On Wed, Aug 13, 2008 at

Re: perl to excel

2008-08-13 Thread DeeDee Messersmith
Sorry guys and gals. I'm new and didn't reply to all. I tried this and I got a message that it could not find this repository. I can't cut and paste the errors but when I start my PPM (windows XP) it says: Downloading tcool packlistfailed 411 length required. I got the same thing when some

RE: Execute the Linux command on remote machine

2008-08-13 Thread Irfan J Sayed (isayed)
Hi All, Thanks for reply. I have Perl.pm installed in following path [EMAIL PROTECTED] scripts]$ ls -l /tmp/Net/SSH/ total 32 -rwxr--r-- 1 cgadgil cgadgil 32724 Aug 13 06:42 Perl.pm [EMAIL PROTECTED] scripts]$ And perl script I modified as follows #! /usr/bin/perl; # perl module to parse the AV

Re: Execute the Linux command on remote machine

2008-08-13 Thread Rob Dixon
Irfan J Sayed (isayed) wrote: > > I want to execute one command on remote Linux machine. > > Following is the perl code. > > #! /usr/bin/perl; > > # perl module to parse the Install.log file for errors > > use lib "/tmp/"; > use Net::SSH::Perl; > my $ssh = Net::SSH::Perl->new(avm-qa-c

Re: Execute the Linux command on remote machine

2008-08-13 Thread Sandeep Kumar
Irfan J Sayed (isayed) wrote: hi, but I have mentioned the absolute path then perl interpreter should take the Perl.pm from "/home/cgadgil/usr/net/ssh/perl" it's very difficult for me to change the makefile as this is not under my control. i can change only this script. Please suggest Rega

Re: Execute the Linux command on remote machine

2008-08-13 Thread Thomas Lovell
On Aug 13, 2008, at 4:25 AM, Irfan J Sayed (isayed) wrote: Hi All, I want to execute one command on remote Linux machine. Following is the perl code. #! /usr/bin/perl; # perl module to parse the Install.log file for errors use lib "/tmp/"; use Net::SSH::Perl; my $ssh = Net::SSH::Perl->n

RE: Execute the Linux command on remote machine

2008-08-13 Thread Irfan J Sayed (isayed)
hi, but I have mentioned the absolute path then perl interpreter should take the Perl.pm from "/home/cgadgil/usr/net/ssh/perl" it's very difficult for me to change the makefile as this is not under my control. i can change only this script. Please suggest Regards Irfan. _

Re: Execute the Linux command on remote machine

2008-08-13 Thread Sandeep Kumar
Irfan J Sayed (isayed) wrote: Still the error is same. Following is the code #! /usr/bin/perl; # perl module to parse the AVMInstall.log file for errors use lib "/home/cgadgil/usr/net/ssh/perl"; use Net::SSH::Perl; my $ssh = Net::SSH::Perl->new(avm-qa-cam2.cisco.com); $ssh->login(cgad

RE: Execute the Linux command on remote machine

2008-08-13 Thread Irfan J Sayed (isayed)
Still the error is same. Following is the code #! /usr/bin/perl; # perl module to parse the AVMInstall.log file for errors use lib "/home/cgadgil/usr/net/ssh/perl"; use Net::SSH::Perl; my $ssh = Net::SSH::Perl->new(avm-qa-cam2.cisco.com); $ssh->login(cgadgil, cgadgil); my($stdout, $

Re: Execute the Linux command on remote machine

2008-08-13 Thread Sandeep Kumar
Irfan J Sayed (isayed) wrote: Hi All, I want to execute one command on remote Linux machine. Following is the perl code. #! /usr/bin/perl; # perl module to parse the Install.log file for errors use lib "/tmp/"; use Net::SSH::Perl; my $ssh = Net::SSH::Perl->new(avm-qa-cam2.net.com

Execute the Linux command on remote machine

2008-08-13 Thread Irfan J Sayed (isayed)
Hi All, I want to execute one command on remote Linux machine. Following is the perl code. #! /usr/bin/perl; # perl module to parse the Install.log file for errors use lib "/tmp/"; use Net::SSH::Perl; my $ssh = Net::SSH::Perl->new(avm-qa-cam2.net.com); $ssh->login(cgadgil, cgadgil