[ Perl ] POST / GET パラメータを取得する ( CGI )

Pocket

Perl で POST や GET パラメータを取得するには Perl に標準搭載されている CGI モジュールを使用する方法が一番簡単だと思います。

スポンサーリンク


CGI::param メソッドを使用して取得しますが、POST であろうと GET パラメータであろうと関係なく取得することができます。また、URL デコードされた結果が取得できますので、自前でデコード処理をする必要はありません。このあたりの仕様は PHP と同じです。( Perl が先とか細かいことは言わないでくださいね。どちらが先かなんて知りませんけどね )

サンプルコード
#!/usr/bin/perl

use strict;
use warnings;
use CGI;

#
# POST / GET パラメータを取得
#
my $q = new CGI;

# パラメータ名を指定して取得する
my $param1 = $q->param('name1');  
my $param2 = $q->param('name2'); 

# 全てのパラメータを取得する
for my $param_name ($q->param) {

  print $param_name . ' = ' . $q->param($param_name) . '\n';
  
}
参考

 

スポンサーリンク

Pocket

Leave a Reply

Your email address will not be published. Required fields are marked *

You may use these HTML tags and attributes: <a href="" title=""> <abbr title=""> <acronym title=""> <b> <blockquote cite=""> <cite> <code> <del datetime=""> <em> <i> <q cite=""> <s> <strike> <strong>