Yes it is. Use PPM to install:
PPM install http://www.roth.net/perl/packages/win32-daemon.ppd
dave
-----Original Message-----
From: Black Pearl [mailto:[EMAIL PROTECTED]]
Sent: Monday, March 19, 2001 2:20 PM
To: [EMAIL PROTECTED]
Subject: RE: installing a Perl script as a service on NT (Debbie
Thomson) (fwd)
Is this module already available for the ActiveState 6xx builds. I've only
seen it available for the 5xx builds.
rgds,
Hans Feringa
On Thu, 15 Mar 2001 [EMAIL PROTECTED] wrote:
> Hi Deb,
>
> try using Dave Roth's Win32::Daemon - it works great for me. The only
thing
> is that you have to extend your script to get all the features of this
> module.
>
> Here is an example:
>
> # Define how long to wait before a default status update is set.
> Win32::Daemon::Timeout( 5 );
>
> # Start the service...
> if( ! Win32::Daemon::StartService() )
> {
> exit();
> }
>
> while( SERVICE_STOPPED != ( $State = Win32::Daemon::State() ) )
> {
> if( SERVICE_START_PENDING == $State ) {
> # your code comes here
> } elsif( SERVICE_PAUSE_PENDING == $State ) {
> # "Pausing..."
> # your code comes here
> Win32::Daemon::State( SERVICE_PAUSED );
> next;
> } elsif( SERVICE_CONTINUE_PENDING == $State ) {
> # "Resuming..."
> # your code comes here
> Win32::Daemon::State( SERVICE_RUNNING );
> next;
> } elsif( SERVICE_STOP_PENDING == $State ) {
> # "Stopping..."
> # your code comes here
> Win32::Daemon::State( SERVICE_STOPPED );
> next;
> } elsif( SERVICE_RUNNING == $State ) {
> # The service is running as normal...
> }
> # here comes your main code...
> }
> sleep(1);
> }
>
> Win32::Daemon::StopService();
>
> Hope this works for you !
>
> Best regards
>
> Christian Kirn
>
>
>
>
>
> Group-Consult GmbH Fon. +49 (7524) 915590
>
> Schwalbenweg 4 Fax. +49 (7524) 915595
>
> D-88339 Bad Waldsee e-mail
> [EMAIL PROTECTED]
> info
> www.group-consult.de
>
>
>
> message sent by Group-Consult GmbH
>
> _______________________________________________
> Perl-Win32-Admin mailing list
> [EMAIL PROTECTED]
> http://listserv.ActiveState.com/mailman/listinfo/perl-win32-admin
>
_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-admin
_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/perl-win32-admin
