原创 思科路由器IOX系統初試

今日接觸了思科推出的IOX系統,有點點體驗。 系統對於ipv4和ipv6已經做了明確的區分,所有的ip形式的命令都更換成了區分ipv4/ipv6的命令格式。 對dlci等命令的格式和形式也都有所變化,不太明白的是pvc和dlci似乎一樣了

原创 使用shell獲取ftp文件

 shell即簡單又快速~ sysdate=`date +"%Y%m%d%H%M%S"` ftpip=192.168.1.2 username=aaa password=aaa ftp -ni $ftpip<<! user $usern

原创 Perl的魅力~

哈哈,前幾天體會了一下perl語言的魅力所在啊: #把Test目錄下所有的文件裏面內容爲5070的替換爲9999,僅一行就完成了巨大的工作,速度還不錯 perl -p -i -e 's/5070/9999/g' ./Test/* #獲取

原创 Perl中對Excel的讀取處理

#讀取excel中存放的用戶進行相關信息匹配use Spreadsheet::ParseExcel; use Encode; my $oExcel = new Spreadsheet::ParseExcel; my $oBook = $

原创 你看到過的最好的代碼註釋是什麼樣的?

下面是stackoverflow網站上網友針對你看到過的最好的代碼註釋是什麼樣的?這個問題給出的回答的前10條: 1. // 親愛的維護者: //

原创 模擬IE瀏覽器衝浪方式實現監測網站各鏈接性能和預覽圖

用途:監測網站內各個鏈接加載響應情況 方式:.net-vs2008 特點:生成總體數據圖; 隨鼠標移動顯示網頁加載響應數據和預覽GIF和JPG網頁的縮略圖。 分析人人網www.renren.com效果圖: 分析百度www.baidu.

原创 Python初學筆記~

工作需要,要接觸python的程序,學習一下~ 使用的3.2版本~話說比2.5變化還真多~print都變了~ 總體感覺,py比較perl來說,特點還是非常之強烈的~ 1、py可以自動字符串複製: >>> x='3' >>> x*3 '33

原创 Perl中ftp的應用

連接ftp有兩種連接模式,默認模式和passive模式。 ftp服務器工作在默認模式下,連接比較簡單: use Net::FTP; #initial ftp my $ftp = Net::FTP->new($ftpserve

原创 使用shell維護系統進程

 n多的僵死進程~,fork~fork~,沒找到原因前只能用批量殺進程的sh維護了~ #!/usr/bin/sh if [ "$1" = "" ] then echo usage:kill cmdname

原创 unix告警轉發配置

格式爲:facility.告警優先級 目的地址或者接收文件 需要注意的是配置爲'*'時,本地終端也會接收到告警,等待你的將是無休止的刷屏~ 系統syslog配置舉例: vi /etc/syslog.conf: local1.info

原创 telnet等交互終端讀取緩衝區問題

與設備等交互時常常由於不可見字符和終端提示的異常字符導致promt失效,得不到自己想要獲取的信息。 除了使用更精確地提示符和增加行結尾符外,這幾天學習了使用select接收,來判斷是否終端還有響應信息,更加精確: use IO::Sock

原创 IBM-AIX、SunOS、Linux、HP-UX上獲取心跳時間

#判斷進程心跳文件的時間,支持四種系統OS=`uname` if [ $OS = "SunOS" ] || [ $OS = "Linux" ] then FileT=`ls -lt $DaFile|grep Alarm.log|a

原创 Perl中SendMail發送郵件問題

 之前使用了perl中SendMail模塊實現了郵件發送功能,不過遇到了郵件正文亂碼,附件正常的情況。 不知道大家是否也都遇到過該問題,還是我的客戶端配置有問題,後來重寫了模塊中sendmail方法,得到解決。 修改也很簡單,只不過把ma

原创 基於apache的soap接口分佈調用

使用Perl中的soap接口完成分佈調用,需要apache正常配置啓動: use SOAP::Lite; use SOAP::Lite +trace=>'all';#打開追蹤排查日誌 my $s = SOAP::Lite ->uri("N

原创 【PERL】使用wmi獲取windows硬件信息

獲取windows信息wmi很好用,哈哈,代碼獲取硬盤型號:     運行結果: