原创 linux grep

Linux系統中grep命令是一種強大的文本搜索工具,它能使用正則表達式搜索文本,並把匹 配的行打印出來。grep全稱是Global Regular Expression Print,表示全局正則表達式版本,它的使用權限是所有用戶。 1

原创 使用perl的模塊Selenium::Remote::Driver選擇下拉框的某一項

my $tool_elm = $driver->find_element("//select[\@id='current-diag-tool']");           # my @opt_elms =

原创 使用Xvfb實現無界面Selenium自動化測試注意事項

在自動化測試時,我們經常用到的是Selenium的無界面運行。這個可以通過Xvfb實現。 1. 首先要安裝Xvfb,網上安裝的教程也很多了,這裏不贅述了。 2. 啓動Xvfb: Xvfb :16 -screen 0 1920x1200x2

原创 perl中Net::Telnet的errmode使用方法

Net::Telnet模塊中errmode可以設置出錯時的處理方式: errmode:共有四個值,這裏討論兩種,die和return $mode = $obj->errmode;  # 這種方式是獲得當前的出錯時的處理方式的值,默認是"

原创 perl實現基本的排序算法

use Data::Dumper;#插入排序sub insert_sort{    my (@arr) = @_;    my $n   = $#arr+1;    my $tmp;    my $i;    my $j;    if($

原创 使用firefox的插件live https header抓https包

在firefox的add-on中搜索live https header,install

原创 array slice和 hash slice

在perl中如果以@開頭表示的是一列數據,更像複數形式,而以$開頭,是表示某一個元素。 1> 數組slice: use Data::Dumper; my @name = (1,2,3,4,5,6,7); @name  = @name[4,

原创 Net::FTP使用ipv6的地址

use Net::INET6Glue::FTP;use Net::FTP;my $ip = '2001:1100::200';    my $ftpuser = 'anonymous';    my $ftppass = '-anonym