締切済み

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

2010/09/14 20:24

HP上で以下のような動きをするフリーのCGIを探しています。ユーザが特定のキーワード（アルファベット）を入力し送信。　　　↓ キーワード毎に違うページへ移動。移動先は静的なページ。登録の無いキーワードの入力。　　　↓ はずれページへ。このような単純な動きをするCGIですが自分では作れないのでフリーの素材を探しています。どこかに無いでしょうか？また、探すとすれば、どういうキーワードで検索すればよいでしょうか？

istvan24
お礼率0% (0/2)

CGI
回答数2
ありがとう数8

みんなの回答 （2）
専門家の回答

みんなの回答

toraneko75
ベストアンサー率51% (27/52)

2010/09/15 02:24 回答No.2

作ってみました。同じディレクトリーに入れてください。 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";