• 締切済み

配列からURLを抜き出し表示する方法

画像をWEB上で管理するためのCGIを作っていますが 配列からURLを抜き出しHTMLにて表示させる良い方法が分かりません 目指しているのは 1.CGIで表示されたサムネイルを押すとmainのFrameに写真が表示される 2.サムネイルの数が一定数(例えば10)を超えると サムネイル表示部分の横にNEXTページの表示ができる 3.mainで出力される画像はある程度のレイアウトを作れる 宜しくご教授お願い致します 作ったCGIをのせると800文字以上と受け付けてくれませんので返答?に載せます。

みんなの回答

  • moon_night
  • ベストアンサー率32% (598/1831)
回答No.2

ええと、わからないのですが、 フレームページがあり、メニュー画面にサムネイル画像が並んでいる ↓ サムネイルをクリックするとメインページにクリックしたサムネイル画像の元画像(大きな画像)が表示される と言うことですか? で、メインの画面のレイアウトが変わってしまうと言うことでしょうか? この辺が良くわかりません。 あと別の話ですが、サムネイルと元画像のURLは一行に入れたほうが扱いやすかったりします。 たとえば --url.txt-- サムネイルURL\t(タブ区切り)元画像URL\t\n サムネイル2URL\t元画像2URL\t\n --Perl-- open (IN,"url.txt"); @image = <IN>; close(IN); print "<table>"; foreach $data (@image) { @img = split(/\t/,$data); print "<tr><td>"; print "<a href="$img[1]">"; print "<img src="$img[0]">"; print "</a>"; print "</td></tr>"; } print "</table>"; サムネイルに元画像のリンクをつけて縦に並びます。

choco_osietekun
質問者

お礼

ありがとうございました!教えて頂いたことを参考に 今のところ問題は解決致しました。 また分からないことが有ればお聞きしにきます~

  • moon_night
  • ベストアンサー率32% (598/1831)
回答No.1

何がわかりませんか? 実際に何かを作って、エラーになるとか、思うとおりに行かないとか? 希望する表示と うまくいかない表示 を提示していただくことはできますか?

choco_osietekun
質問者

補足

回答ありがとうございます。 @imageにはサムネイルのURLとサムネイルをクリックしたとき飛ぶ元画像のURL等が(2行で1つの画像)入っています 今のところ実験的に10個づつの画像を横に並べ それを縦に並べています クリックして画像を表示したとき、画像の大きさによって フレームに隙間が出来てしまいすごく不細工なので何とかなりませんか? #ファイル表示 print "Content-type: text/html\n\n"; print <<HTML_head; <HTML><head></head> <BODY> <table border=\"1\" width=\"700\" bgcolor=\"#fffccc\"> <tr> HTML_head open (TIMGDATA,"<T_data.text"); @image = <TIMGDATA>; while (@image != ""){ for ($i=1; $i<=20; $i++) { print shift(@image); } print "</tr><p></p>\n"; } print <<HTML_foot; </tr> </table> </BODY></HTML> HTML_foot close (TIMGDATA);

関連するQ&A