- 締切済み
掲示板改造中です。長い投稿内容を別ページで
回答者の皆様お世話になります。 現在、掲示板を改造中の初心者です。（今までアクセスカウンター、アクセスログ、メールフォーム等を本で勉強して作りました。） さて上記件名の詳しい内容ですが・・・ 例えば合計2000文字の長い投稿記事を掲示板上では省略掲載して200文字だけ出力して（ココぐらいは私でもわかりますが--->ココから先が困ってます。）「・・・続きを読む」で別ページで全て出力したいのですがどのようにすれば良いのかわかりません。 御親切な回答者の方よろしくお願いいたします。
- dualvain13
- お礼率25% (1/4)
- Perl
- 回答数1
- ありがとう数3
- みんなの回答 （1）
- 専門家の回答
みんなの回答
- good4you4y
- ベストアンサー率73% (11/15)
先ず質問ですが、その記事には特定の番号や認証番号（唯一のもので、他の記事とは違うもの）はついていますでしょうか？ それがあるなら、別ファイルにPerlでコードを書いて（もしくはsubを用いて）、そこにリンクを貼ればよいかと思います。 例えば、リンクはこのように、 http://www.test.net/test/test.cgi?no="特定の番号など" を貼って、 別ファイルには、perlでその番号を受け取り、データファイルを開き、その後、その特定番号に適した記事を表示されるように。 =============================================== #!/usr/bin/perl #↑CGIのパスです。分からない場合はプロバイダーに必ず確認 #jcodeの位置 require './jcode.pl'; #ディコード処理 ここにディコード処理 print "Content-type: text/htm\n\n"; print "<HTML><HEAD>\n"; print "</HEAD><BODY>\n"; #ファイルをオープン open (IN, "<$datafile") || &error("データファイルを開けまん。"); @data = <IN>; close (IN); #@dataの中に特定番号を探して、表示 foreach $data(@data){ local($NO,$kiji) = split(/,/,$data); if($NO eq $in{'no'}){ print "$kiji\n"; last; } } print "</BODY></HTML>\n"; exit; ================================================= の形のようにやれば出来るかと。もちろんこれですと、ただ内容をずら～と並べる感じになるので、レイアウトはしなくてはいけません。またforeach内のsplitには区切りマークを,にしてありますので、その辺りも注意が必要かと。
お礼
お礼のご返事が遅くなって申し訳ありませんでした。 ご親切なご回答に大変感謝しております。 まず、ご質問の件ですが一応IDナンバーがついてます。 そして次にgood4you4yさんの回答にもあるとおり、リンクを張りたいのですが http://www.test.net/test/test.cgi?no= ↑↑↑↑ このようなリンクの生成が初めてなのでどのようにすれば良いのかわかりません・・・ good4you4yさんの御回答を参考にがんばってみます。 わからないときはまた、書き込みますのでその時はよろしくお願いします。 本当にありがとうございました。