HP上で以下のような動きをするフリーのCGIを探しています。

締切済

質問者：istvan24
質問日時：2010/09/14 20:24
回答数：2件

HP上で以下のような動きをするフリーのCGIを探しています。

ユーザが特定のキーワード（アルファベット）を入力し送信。
　　　↓
キーワード毎に違うページへ移動。
移動先は静的なページ。

登録の無いキーワードの入力。
　　　↓
はずれページへ。

このような単純な動きをするCGIですが自分では作れないのでフリーの素材を探しています。
どこかに無いでしょうか？
また、探すとすれば、どういうキーワードで検索すればよいでしょうか？

通報する

この質問への回答は締め切られました。

質問の本文を隠す

回答 (2件)

最新から表示
回答順に表示

No.2

回答者： toraneko75
回答日時：2010/09/15 02:24

作ってみました。

同じディレクトリーに入れてください。
key.cgiはサーバーにあわせて属性変更してください。

form.html
<html><head>
<title>key</title>
</head>
<body >
<form method="post" action="key.cgi">
<input type="text" size="20" name="keyword">
<input type="submit" value="移動">
</form>
</body>
</html>

key.cgi
#!/usr/bin/perl
use strict;
use warnings;
use CGI::Carp qw(fatalsToBrowser);
use CGI;

my ( $q, $value, );

#「キーワード,ファイルアドレス」をスペース区切りでいくつでも可
my @key_ad = qw(a,a.html b,b.html c,c.html d,d.html);

#ハズレのアドレスを入れてください。
my $hazure = 'index.html';

$q = new CGI;
$value = $q->param('keyword');

foreach (@key_ad) {
my ( $key, $url ) = split /,/;
if ( $key eq $value ) {
print "Location: $url\n\n";
}
}
print "Location: $hazure\n\n";