【專題交流】我今天又偷懶了

hmilymb

幾十個配置文件，每個文件中里面有許多ip和端口，由于網絡更改了，許多ip和端口都變了。
網絡部門那邊給一ip更變文件，里面記錄那個ip更變。

如果用手工一個一個改，既痛苦有不能保證是否遺漏和錯誤，怎么也得用2天，用per寫了個小程序，先讀ip更變文件，遍歷并更改配置文件，又快又好，不用半個小時搞掂。

[ 本帖最后由 hmilymb 于 2007-8-30 04:38 編輯 ]

mdsqeh

樓上的寫的太精彩了,雖然不懂PERL ,看了大家的介紹決定就學他了,順便說一句 我是做網絡維護的.

xjtubaby

樓上的兄弟們都寫得太好了，值得借鑒阿，我也寫過點小的，最近一個

由于測試需要，每天都需要測試新出的build，而且build文件很大，下載又慢，寫了個perl程序，每天下班自動下載其最新的版本到本地，解壓，修改配置文件，安裝，第二天過來測試，節省了挺多時間的。：）
沒用到太多的模塊，看來要向前輩們學習��！

goride

對樓上的諸多前輩真是佩服啊。

longbow0

佩服，學習中

gdutllf2006

準備學習中！
聽說學perl使人變懶！

xti9er

工作中我也常用perl來做一些事情，自動化，降低人力成本。

工作中：
1、以前干工程，需要計算道路線路曲線坐標。通過perl編寫的程序，只要輸入初始參數，整條線路3公里逐個輸出坐標，比人工計算即省時又省力，還不會出錯。
2、現管理服務器時現，與nagios配合，間隔多久自動查詢頁面，返回的結果取需要關注的地方，按事件重要程度發mail通知。
這比盯著N多服務器省心很多。
還有很多工作中的應用不方便說了。

生活中：
1、炒股，自動收集整理我持有股票的漲跌并匯總，計算盈虧
2、翻譯，通過google或本地詞庫翻譯
3、炒黃金，提取黃金走勢圖
4、spider

網絡安全方面 就更不必多說了，非常順手

以上諸多工具都可以按需擴展功能

[ 本帖最后由 xti9er 于 2009-6-2 15:07 編輯 ]

wxlfh

單位年初都要造上一年的年報，于是就用Perl配合Win32::OLE模塊自動生成了報表，我只要半小時，這還包括了數據準備，報表錄入（年報系統是一個N老的系統，用Visual Foxpro編的，因為不熟悉系統，沒敢自己寫DBF文件），打印的時間。

想起以前我的前任要忙活一星期，我就情不自禁地笑了。

[ 本帖最后由 wxlfh 于 2009-6-2 14:59 編輯 ]

ttcn

1. 用perl生成設備config文件。 公司要deploy幾十個設備，每個設備都要按照excel表格配置網絡地址，用perl讀取后直接生成

2.解析log，用perl分析日志，沒用的信息統統濾掉，幾百行的log大概留下十幾行

3.用perl去下載國家地理雜志每日圖片：公司里的電腦是24小時開著的，vista下設置一個計劃任務，每天下載，積少成多
代碼見：http://hi.baidu.com/seraphxby/bl ... cc18d4572c84a1.html

black_fire

從A服務器取到access.log, 同步到B服務器進行 awstats分析,

基本流程：
1. perl取到 A服務器sites下所有網站的access.log, 同步到B服務器(如有需要，自動創建相應該文件夾),  
2. 套用 lighttpd模板 修改lighttpd配置(一般是創建一個虛擬主機), 然后生成隨機密碼， 發送給sysadmin。
3. 流量統計的首頁產生簡報