フォームで入力されたパラメータを取得する

perl cgi

test.html

<html>
<head>
<body>
	<form action="cgi-bin/test.cgi">
		<table>
		<tr>
			<td>名前:</td>
			<td><input type="text" size="20" name="name"></td>
		</tr>
		<tr>
			<td>メールアドレス</td>
			<td><input type="text" size="20" name="mail"></td>
		</tr>
		<tr>
			<td colspan="2" align="center">
				<input type="submit" value="送信">
			</td>
		</tr>
		</table>
	</form>
</body>
</html>

test.cgi

#CGIモジュール param()関数を使うための宣言
use CGI qw(:standard);

print "Content-type: text/html\n\n";

if( param('name') ){
	$name = param('name');
	print $name;
}else{
	print "***error***\n";
}

参考