#defines ? or Constant Data in perl ?

2002-09-23 Thread Story, Lenny
Greetings, Is there some such way to define a constant, or #define style variable in perl ? I typically have the need to define data which is just to eliminate the need for "magic" numbers etc. thus far i have just defined variables such as : my $WELCOME_MSG = "Hello!"; print $WELCOME_MSG;

RE: Perl Script as a Service

2002-09-23 Thread Peter Guzis
Once you properly install the service and put the aforementioned code in your script you are running a full-fledged service. You can start and stop it just like any other service. No special tools are required. Peter Guzis Web Administrator, Sr. ENCAD, Inc. - A Kodak Company email: [EMAIL PROTE

RE: Perl Script as a Service

2002-09-23 Thread Peter Guzis
Is that your complete script? If so, you forgot the actual service code. Running as a service requires a system for polling/returning service states. The following works for me: use strict; use Win32::Daemon; my ($state, $last_state); Win32::Daemon::StartService(); sleep 1 until Win32::Daemon:

RE: Perl Script as a Service

2002-09-23 Thread Scott Campbell
It looks like you only copied part of Dave's script. You only have the section where Dave shows how to INSTALL a service. I bet if you were to look in your services, you would see your new service installed. What you also need is the code where the script deals with starting, stopping, e

Perl Script as a Service

2002-09-23 Thread Stanley . G . Martin
I'm trying to get a script that wrote that listens on a port for connections from a client. The script runs fine from command line, but when I set it up as a service, it won't start. I took this right out of Dave Roth's Win32::Daemon module. When I use the Win 2000 Resource Kit utility 'srvany'

RE: ppm3 search *all* repositories ???

2002-09-23 Thread Cutts III, James H.
-Original Message- From: Michael D. Schleif [mailto:[EMAIL PROTECTED]] Sent: Friday, September 20, 2002 21:24 Cc: Perl-Win32-Users List Service Subject: Re: ppm3 search *all* repositories ??? Sisyphus wrote: > > - Original Message - > From: "Michael D. Schleif" <[EMAIL PROTE

PerlScript in .wsf (Windows Script Host)

2002-09-23 Thread Jitendra Soam
Title: Message Hi ,     I have created a Windows Script Host file .wsf with PerlScript and VBScript embedded in it.  How can I call a function in PerlScript which is defined in VBScript Section .  Thanks Jitendra    

RE: LWP + NTLM

2002-09-23 Thread Tillman, James
> -Original Message- > From: Peter Guzis [mailto:[EMAIL PROTECTED]] > Sent: Thursday, September 19, 2002 5:37 PM > To: [EMAIL PROTECTED] > Subject: RE: LWP + NTLM > > > The short answer is "no, it will not work" and unfortunately > I do not have a > (working) solution. I know what is *

Re: splitting a string

2002-09-23 Thread $Bill Luebkert
anurag sharma wrote: > My input file is like this: > > 2137 6378287489737493759749057476986985967 > 95795687958697859687906879068097895 Don't post HTML, it's too hard to read numbers/spaces etc. > I want output file like this : > > 21376 378 and so on..

Re: splitting a string

2002-09-23 Thread anurag sharma
My input file is like this: 2137   6378287489737493759749057476986985967   95795687958697859687906879068097895 I want output file like this : 2137    6 378 and so on. My problem is when I save output by this command: perl fileneme> output The file is not recogniz