ページ処理
毎度お世話になってます
同じような質問を数回させていただいたのですが
自分の技量不足のため上手く行きませんでした
なので再度質問の形を変えてお聞きさせていただきます
今以下のようなコーティングでデータベースを
作成しています その際のページ処理が上手くいきません
どのように上手くいかないかというと
マッチしたサイト全てが検索結果に表示されてしまいます
このコーティングをベースに構成したいのですが
何とかなりますでしょうか？
$view=2;
sub subtwo
{open(fp,"log.txt");
@lines = <op>;
close(op);
$bigin = $in{"page"} * $view;
$end = $bigin + $view;
if($i !~ /\d+/){$i = 0};
if($open eq "")
{foreach $line (@li)
{($abc,$def,$ghi,$jkl,) = split(/,/,$line);
$chk = 1;
foreach $k (@key)
{if(index($line,$k,)<0)
{$c = 0;
last}}
if($c>0)
{print "<A HREF=\"$abc\">$def</A><br>\n";<br>\n";}}}}
############################################
sub subthree
{$bigin = $in{"page"} * $view;
$end = $bigin + $view;
if($end<$マッチした総数の変数)
{$nextpage=$in{"page"}+1;
print qq(<FORM method="get" action="kensaku.cgi">
<INPUT TYPE=HIDDEN NAME="page" VALUE="$nextpage">
<INPUT TYPE="SUBMIT" VALUE="next">
</FORM>\n);}
if($bigin>0)
{$backpage=$in{"page"}-1;
print qq(FORM method="get" action="kensaku.cgi">
<INPUT TYPE="HIDDEN" NAME="page" VALUE="$backpage">
<INPUT TYPE="SUBMIT" VALUE="back">\n);}
if($page<0)
{$page=0}
}
お礼
やはり、サーバーサイドの構築が必要なんですね。 どの言語・サービスが相性がいいか模索してみます。 ありがとうございます。