CGI-BBS > CGI > Perl > PerlについてJ-SkyでPNG画像を表示できない。


カレッヂ
カレッヂ


質問者 小野塚貴弘  投稿日 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/
サーバのOS:UNIXサーバ
パソコンのOS:WinNT系
エディタ:メモ帳
FTPソフト:NextFTP
サーバ移転:していない
改造:(未選択)
CGI習熟度:middle

返信(回答)する

 


Web裏技