カレッヂ |
質問者 小野塚貴弘
投稿日 10/19(日) 13:02:29
[削除] (返信・回答が付いた後にこの質問の削除はできません)
下記の通り自作でCGIを作ったのですがJ-Skyでみたら画像部分が反映されませんでした。 何が悪いのかアドバイスいただけませんでしょうか? #!/usr/bin/perl # -----------レイアウトの設定----------- #■文字の色の設定 $text_c = '#000099'; #■背景色の設定 $bg_C = '#FFFF88'; # -----------戻り先URLの設定----------- # 戻り先の指定はフルパスで!! # (例)http://www.zyforce-inc.com/index.html #■i-modeの戻り先 $back_i = 'http://www.zyforce-inc.com/index.html'; #■J-skyの戻り先 $back_j = 'http://www.zyforce-inc.com/index.html'; #↑↑↑↑↑↑↑↑設定はココまで↑↑↑↑↑↑↑↑ #----------------# # ブラウザ判別 # #----------------# $HTTP_USER_AGENT = $ENV{'HTTP_USER_AGENT'}; if ($HTTP_USER_AGENT =~ /DoCoMo/i) { &imode; } #imode用 elsif ($HTTP_USER_AGENT =~ /J-PHONE/i) { &jsky; } #jphone用 else { &pc; } #パソコン用 exit; #----------------# # i-mode表示部 # #----------------# sub imode{ print "Content-type: text/html\n\n"; print "<html>\n"; print "<head>\n"; print "<title>TEST</title>\n"; print "</head>\n"; print "<BODY bgcolor=\"$bg_C\" text=\"$text_c\">\n"; print "<center>\n"; print "iモードからアクセスしました。<BR>\n"; print "<IMG SRC=image.gif><BR>\n"; print "<CENTER><A HREF=\"$back_i\">戻る</A></CENTER>\n"; print "</body></HTML>\n"; } #----------------# # j-sky表示部 # #----------------# sub jsky{ print "Content-type: text/html\n\n"; print "<html>\n"; print "<head>\n"; print "<title>TEST</title>\n"; print "</head>\n"; print "<BODY bgcolor=\"$bg_C\" text=\"$text_c\">\n"; print "<center>\n"; print "JSKYからアクセスしました。<BR>\n"; print "<IMG SRC=image.pngf><BR>\n"; print "<CENTER><A HREF=\"$back_j\">戻る</A></CENTER>\n"; print "</body></HTML>\n"; } #----------------# # PC表示部 # #----------------# sub pc{ print "Content-type: text/html\n\n"; print "<html>\n"; print "<head>\n"; print "<title>TEST</title>\n"; print "</head>\n"; print "<BODY bgcolor=\"$bg_C\" text=\"$text_c\">\n"; print "PCからアクセスしました。<BR>\n"; print "</body></HTML>\n"; }
プロバイダ参照:http://www.zyforce-inc.com/ |
返信(回答)する
Web裏技 |