CGIでtxtが読み取れません…
--------------frame.cgi-----------------------
#!/usr/bin/perl
# フォームからのデータを読み込む
$ID1 = '12345';
$path = 'http://xxx.xxx/cgi-bin/atc/user/';
$txt = '.txt';
$FileName = $path.$ID1.$txt;
print "Content-type: text/html\n";
print "\n";
if (-f $FileName){
print <<"DISP_SET";
<HTML>
<frameset rows="80,*" cols="*" framespacing="1"" frameborder="yes" border="1" bordercolor="#000000">
<frame src="input.cgi?$ID1" name="top" scrolling="no" noresize>
<frame src="http://xxx.xxx/nodata.htm" name="mainF">
</frameset>
</HTML>
DISP_SET
}
else{
print <<"DISP_SET";
<HTML>
<BR>
指定された$ID1はありません。<BR>
新規発行をするか、IDの確認をしてください。<BR>
<BR><BR>
<a href="javascript:history.back();">一つ前のページへ戻る</a>
</HTML>
DISP_SET
}
exit;
-----------------------------------------
サーバの中身を引越ししようと有料のサーバにうつしたのものです。
このようになっているのですが、txtファイルが読めていないらしく、エラーメッセージの方が出てしまいます。
ちゃんと12345.txtというのは存在します。
フォルダのパス名とかは修正し大丈夫だと思うのですが、読み取れません…
http://xxx.xxx/cgi-bin/atc/input.cgi?12345
読み取れる
http://xxx.xxx/cgi-bin/atc/frame.cgi?12345
読み取れない
なので、txtデータを読み取れていないと思いました。
原因、修正個所、追加補足などありましたら、よろしくお願いします。
