Posts Tagged ‘ cgi

[Perl]CGI 模组常用语法

加载 CGI 模组

use CGI qw/:standard/;
my $CGI = CGI->new();

取得所有输入的参数名称

@param_name = $CGI->param();

取得特定参数的内容

$value = $CGI->param( "param_name" );

取得所有参数的名称及内容

%param = $CGI->Vars;

转换 $url 为 url 可接受的字串

$url_escape = $CGI->escape( $url )

取得目前网页的编码

$charset = $CGI->charset();

指定网页的编码,并送出网页表头

print $CGI->header( -charset=>"utf-8", -expires=>"-1d" );

return top