RE: Regular Expression Problem

2002-11-20 Thread Joseph P. Discenza
Lee Cullip wrote, on Wednesday, November 20, 2002 08:06 : $prmpt =~ /^(.*:\/home\/oracle[:=>]{1,2})/; : $telnet = new Net::Telnet(-prompt => $prmpt, -Errmode => 'die'); : I still get the following error message though : : : bad match operator: opening delimiter missing: : ^(.*:/home/oracle[

Re: Regular Expression Problem

2002-11-20 Thread csaba . raduly
On 20/11/2002 13:06:29 Lee Cullip wrote: >Thanks for replying Joe, >maybe if you see a bit more code you can get an idea for what I'm trying to >do : > >use Net::Telnet; >use IO::File; > >$prmpt =~ /^(.*:\/home\/oracle[:=>]{1,2})/; [snip] > >I still get the following error message though : > >ba

Re: Regular Expression Problem

2002-11-20 Thread Lee Cullip
Thanks for replying joe, maybe if you see a bit more code you can get an idea for what I'm trying to do : use Net::Telnet; use IO::File; $prmpt =~ /^(.*:\/home\/oracle[:=>]{1,2})/; $telnet = new Net::Telnet(-prompt => $prmpt, -Errmode => 'die'); $telnet->open($HOST); $telnet->login($USER

RE: Win32::GUI question

2002-11-20 Thread Peter Eisengrein
Title: RE: Win32::GUI question Try creating it as a window and add this option:     -dialogui => 1, and see if that gives the functionality you're looking for. -Pete > -Original Message- > From: Hawley, Eric [mailto:[EMAIL PROTECTED]] > Sent: Tuesday, November 19, 2002 16:1

Re: Win32 to UNIX

2002-11-20 Thread Simon Oliver
Anything that uses Win32::* modules will need to be rewritten. For example, scripts that use Win32::ODBC will need to be rewritten using DBI instead. Scripts that run as services can easily be installed into specific run-levels by your UNIX administrator. Anything that uses OLE to Windows appl

RE: Win32 to UNIX

2002-11-20 Thread Peter Eisengrein
Title: RE: Win32 to UNIX in that case, you don't have time to be reading email -- you'd better get started re-writing!!! ;-) > -Original Message- > From: Briggs, Larry [mailto:[EMAIL PROTECTED]] > Sent: Wednesday, November 20, 2002 07:10 > To: 'Simon Oliver'; Briggs, Larry > Cc:

RE: Regular Expression Problem

2002-11-20 Thread Joseph P. Discenza
Lee Cullip wrote, on Wednesday, November 20, 2002 06:50 : Can anybody tell me what is wrong with the following line ? : : $prmpt = /(^.*[:]\/home\/oracle[:=>]{1,2})/; : : I'm trying to use the value of $prmpt in a call to Net::Telnet but before I can : use the variable $prmpt, perl is complainin

RE: Win32 to UNIX

2002-11-20 Thread Briggs, Larry
unfortunately we used Win32::* through out. And set up some programs a services. -Original Message- From: Simon Oliver [mailto:[EMAIL PROTECTED]] Sent: Wednesday, November 20, 2002 7:03 AM To: Briggs, Larry Cc: '[EMAIL PROTECTED]' Subject: Re: Win32 to UNIX Briggs, Larry wrote: > Hi All

Re: Win32 to UNIX

2002-11-20 Thread Simon Oliver
Briggs, Larry wrote: Hi All My office has decided to listen to the hardware guys instead of the developers/programers. So I have be asked to find out what it would take to convert all of our perl programs from win32 to UNIX. I currently have a web system in place running ActiveState Perl v5.6.1

Win32 to UNIX

2002-11-20 Thread Briggs, Larry
Hi All My office has decided to listen to the hardware guys instead of the developers/programers. So I have be asked to find out what it would take to convert all of our perl programs from win32 to UNIX. I currently have a web system in place running ActiveState Perl v5.6.1 build 633 on two NT We

Regular Expression Problem

2002-11-20 Thread Lee Cullip
Can anybody tell me what is wrong with the following line ?     $prmpt = /(^.*[:]\/home\/oracle[:=>]{1,2})/;   I'm trying to use the value of $prmpt in a call to Net::Telnet but before I can use the variable $prmpt, perl is complaining about the format of the pattern. Any help would be appr

Re: Convert Bourne script

2002-11-20 Thread Philip Morley
|-+---> | | "Adept" <[EMAIL PROTECTED]> | | | Sent by:| | | [EMAIL PROTECTED]| | | veState.com | | |

RE: timed-out waiting for command prompt

2002-11-20 Thread ibrahim
Thanks a lot for everyone. It works. I added a new part to send the result to a file and it did. I hope that there is no still error. Thanks again. use Net::Telnet; my $Telnet = new Net::Telnet; my $InHandle = $Telnet->input_log("inlog.txt"); my $OutHandle = $Telnet->output_log("outlog