如何把perl腳本做成一個服務,放在后臺運行

hxlqjs

windows 2000環(huán)境下,如何把perl腳本做成一個服務,放在后臺運行?

af80

原帖由 hxlqjs 于 2005-11-16 16:08 發(fā)表
windows 2000環(huán)境下,如何把perl腳本做成一個服務,放在后臺運行?

win32下也支持fork的吧?fork出一個子進程，然后父進程die掉，把子進程的3個標準句柄脫離終端，重定向到某個地方即可。

HonestQiao

www.cpan.org
Win32::Service

這個模塊很好用的，我用過的。

duketang

脫離終端怎么做？

蘭花仙子

原帖由 duketang 于 2005-11-17 16:18 發(fā)表
脫離終端怎么做？

脫離終端有幾個條件：
父進程die掉；
子進程成為進程組的leader；
把3個標準句柄重定向到某一處（例如/dev/null）；
為了捕獲錯誤，通常$SIG{__DIE__} and $SIG{__WARN__}這些句柄都要重載。

POLOGG

原帖由 蘭花仙子 于 2005-11-17 19:18 發(fā)表


脫離終端有幾個條件：
父進程die掉；
子進程成為進程組的leader；
把3個標準句柄重定向到某一處（例如/dev/null）；
為了捕獲錯誤，通常$SIG{__DIE__} and $SIG{__WARN__}這些句柄都要重載。

我不知，linux下的daemon程序算不算，脫離終端？

上面說的是一種！

還有一種
父進程die掉；
子進程成為進程組的leader；
然后子進程在fork出一個進程，就是孫子了！
die掉子進程，應該就可以了！這樣就成了daemon了！

蘭花仙子

原帖由 POLOGG 于 2005-11-17 19:39 發(fā)表


我不知，linux下的daemon程序算不算，脫離終端？

上面說的是一種！

還有一種
父進程die掉；
子進程成為進程組的leader；
然后子進程在fork出一個進程，就是孫子了！
die掉子進程，應該就可以了！這 ...

daemon一般都是脫離終端的，其實一般而言，脫離終端的目的就是為了脫離終端信號例如SIGHUP的影響。
Linux下，用nohup命令來運行程序，也實現(xiàn)了上述目的。

hxlqjs

這些方法都帶有unix的深深烙印,習慣了自己寫程序處理一切問題,這樣做加到后臺是可以實現(xiàn),如何做成SCM(service control mananger)的一個服務?通過services.msc就可以方便的起停服務.?

通過兩天的艱苦摸索,在win32::daemon::simple和win32::daemon中提供了一些思路,他可以把當前進程變成一個服務,提供了啟動和卸載服務功能,這些我都完成了,比較暈的是不能通過services.msc來起停服務,還有其中的serviceloop的用法比較讓人暈,循環(huán)接受SCM的消息是對的,干嗎我的應用也要跟著她LOOP.

windows程序要求也太高了,只要用戶點一下安裝,所有問題全搞定,在這方面,UNIX確實要向WINDOWS學習,但這可害苦了我們這些苦命的人

繼續(xù)想辦法....

ihere

Komodo的perl Dev Kit有將其轉化成服務的編譯程序，不知道對你有沒有用�。�！

benlan

能不能做到linux開機自動啟動perl腳本