Perl使用技巧13：使用CGI模塊獲取參數(shù)

arche77

use CGI; 最常見。我一般習慣用use CGI::Simple模塊。具體什么區(qū)別沒看，一般我常用的函數(shù)都有。

use CGI::Simple qw(-debug1);

使用debug參數(shù)支持命令行輸入?yún)��?shù)，這樣就不用非要放在瀏覽器中了。

$cgi=CGI::Simple->new();

生成一個對象。

sub param {
        my %hash=$cgi->Vars;
        deep_utf8_decode(\%hash);
        return @hash{@_};
}

寫一個獲取參數(shù)的方法：

$a=param('a');
say $a;

($a,$b)=param('a','b');
say "$a,$b";

運行結果如下：

localhost:cgi arche$ perl test.pl "a=1&b=2"
1
1,2

是不是很方便，賦值給標量，可以獲取1個參數(shù)，賦值給數(shù)組，可以獲取多個參數(shù)。