用perl寫的一個watchdog程式
關鍵字: perl 監控 web服務 重啟web服務
需要寫個程式來監控web服務的情況,如果web服務由於某種原因吊死,就需要重啟tomcat。所以就寫了這個簡單的程式,這個算是雛形吧。有夠鬱悶,還要寫這種程式,^_^。
說實話,這個程式沒有什麼技術含量,可是由於我不懂,還是在網上找了一陣子才看到可以使用LWP。
[@more@]use strict;
use warnings;
use LWP::UserAgent;
my $browser = LWP::UserAgent->new;
my $url = '';
my $response = $browser->get( $url );
if($response->is_success){
exit;#如果首頁響應,則退出,否則重啟tomcat
}else{
system("C:/zxin10/Was/Tomcat/bin/shutdown.bat");
system("C:/zxin10/Was/Tomcat/bin/startup.bat");
}
需要用到一個包,可以到cpan下載吧。名字叫做lwp。下載到本地之後,如果是windows平臺,解壓後到對應路徑執行 perl make.pl就可以了。如果是unix/linux平臺,則需要執行如下:
perl make.PL
make
make test
make install
然後就ok了。
來自 “ ITPUB部落格 ” ,連結:http://blog.itpub.net/47869/viewspace-822480/,如需轉載,請註明出處,否則將追究法律責任。
相關文章
- 如何編寫一個Perl爬蟲程式爬蟲
- 用 PHP 寫一個"程式語言"PHP
- 用Java編寫一個最簡單的桌面程式Java
- 請用js編寫一個紅綠燈程式JS
- 請用canvas寫一個關於520浪漫表白的程式碼Canvas
- Perl讀寫檔案&字串操作字串
- 用JAVA寫一個阿里雲VPC Open API呼叫程式Java阿里API
- 用Taro寫一個微信小程式(三)—— 配置dva微信小程式
- 用 Go 寫一個簡易的 dockerGoDocker
- 用js寫的一個跑馬燈JS
- Perl IO:隨機讀寫檔案隨機
- 使用Perl和WWW::Mechanize庫編寫
- 用eclipes寫第一個HelloWorld
- mpvue寫一個CPASS小程式Vue
- 編寫第一個Qt程式QT
- [譯] 用javascript實現一門程式語言-寫一個解析器JavaScript
- Perl程式:殭屍程式和孤兒程式
- 用nodejs寫一個命令列應用-前言NodeJS命令列
- [譯] 教程 — 用 C 寫一個 Shell
- [譯] 用 Rust 寫一個微服務Rust微服務
- 用 JavaScript 寫一個區塊鏈JavaScript區塊鏈
- 七個不一樣的Python程式碼寫法,讓你寫出一手漂亮的程式碼Python
- 用Flask寫一個上傳圖片的APIFlaskAPI
- 編寫一個使用wreq庫的爬蟲程式爬蟲
- 如何寫一個 GNU 風格的命令列程式命令列
- 寫一個簡單的程式碼生成器
- perl的logwrapperAPP
- 你用過不寫程式碼就能完成一個簡單模組的元件麼?元件
- 用python為喜歡的人寫一個程式,每天傳送貼心的訊息Python
- 我的第一個Android應用程式Android
- 如何編寫一個可複用元件元件
- 用jQuery手寫一個小遊戲jQuery遊戲
- 【譯】用JavaScript寫一個區塊鏈JavaScript區塊鏈
- 用Flutter 寫一個簡單頁面Flutter
- 用SwiftUI寫一個簡單頁面SwiftUI
- 用 Laravel 6 寫了一個部落格Laravel
- 用 JavaScript 寫一個卡片小遊戲JavaScript遊戲
- 用java寫一個lisp 直譯器JavaLisp
- 用原生Go寫一個自己的部落格-搭建專案(一)Go