原创 CentOS 命令行通過命令獲取ipv4和ipv6地址

1. 方法一:dig $INTERNET_URL AAAA +short 2. 方法二:nslookup 點贊 收藏 分享 文章舉報 zy12805 發佈了66 篇原創文章

原创 shell中使用curl時,數據爲亂碼的解決方法,以及一些參數的解釋

在使用shell中的curl訪問baidu時,返回值爲亂碼,可通過|iconv -fgb2312 -t utf-8方式解決: eg : curl -v -m 10 -6 https://www.baidu.com|iconv -t gb2

原创 Perl中的alarm、eval、die的聯合使用

1. eval: eval是一個表達式,而不是if和while這樣的控制結構,eval塊發生嚴重錯誤時,eval塊會停止執行,但程序不會崩潰。所以在程序中執行有可能引起嚴重錯誤的代碼塊,但又不想影響後續程序的執行時,可以把這部分代碼塊放入

原创 在centos中用腳本給firefox導入certificate

在寫自動化測試腳本時,如果想給firefox導入certificate,可以使用certutil工具。具體介紹可以看https://developer.mozilla.org/en-US/docs/Mozilla/Projects/NSS

原创 quotemeta函數爲預定義的字符前加反斜槓

quotemeta函數爲預定義的字符前加反斜槓。 很多時候在定義一個好一個字符串後,想在模式匹配中也用這個字符串去匹配,但是又擔心裏面有預定義的字符,比如.等,可以用quotemeta這個函數。 eg:my $quote_ipv4 = q

原创 linux下批量殺死進程(使用了xargs)

 ps -aux | grep ping6 | cut -c 9-15 | xargs kill -9這條命令用了管道的方式,|左邊的輸出作爲右邊的輸入。ps -aux 列出進程grep ping6是找出上一步輸出的進程中包含ping6的

原创 perl中的format(未完待續)

perl提供了一個簡單的機制幫助格式化輸出,產生簡單的格式化報表。 包括 1. 格式聲明format; 2. 執行write 格式聲明如下: format  FormatName = Fied line

原创 ip -6 n之後 router FAILED的問題

今天遇到一個網絡問題,在centos的機器上給eth0配了靜態ipv6地址(在/etc/sysconfig/network-scripts/ifcfg-eth0),然後通過firmware想去訪問另一臺機器,但是一直ping不通另一臺機器

原创 perl中的引用

1. 創建引用: 1.1 用反斜槓操作符:   $arr = \@ARGS; $arr = \$str; $hashref = \%hash; 1.2 匿名數據 1.2.1 匿名數組組合器: 用方括弧創建一個匿名數組的引用: $arra

原创 使用perl的Net::SMTP::SSL模塊發送smtps帶附件的郵件

use Net::SMTP::SSL;   use MIME::Lite;   my  $mail_from = '[email protected]';   my  $mail_to =

原创 perl grep and map

Perl中的grep可以從列表中取出某些需要的元素。grep 第一個參數是一個塊,其中$_依次爲列表中的每一個值,返回一個Boolean(true/false)值。剩下的參數是相應的列表。grep 會首先計算表達式的值,這和foreach

原创 perl中$/的作用

$/在perl中是輸入記錄分隔符,影響perl對"行"的理解。默認是換行符"\n".也可以定義爲其他的內容: 需要特別注意的是,$/的值是字符串,不是模式匹配。 1> 不修改$/的內容,默認爲"\n" eg: test.pl open W

原创 perl實現的一個模式替換題目

在網上看到一個perl模式匹配的題目,自己試了下結果,留個底:以下是一個文件的一部分:block1    LAYER1        a0=56, b0=147.345989944561, c0=11.0225098942223    

原创 Setup smtps(包含ipv4和ipv6的DNS配置)

1. 配置DNS(ipv4或者ipv6)1> cd /etc2>  vim named.confoptions {        listen-on port 53 { any; };        listen-on-v6 port 5

原创 perl中模塊以及模塊中的函數的引入

在perl中提供了大量的模塊以及別人寫好的模塊,可以安裝使用。 1> 例如可以用use File::Basename,引入模塊,並且可以直接使用這個模塊裏面的全部函數。     use File::Basename; my $dir