PHPでのCGIの読み込みが機能しない原因
PHPでCGIのデータをHTMLに読み込んでいます。
トップページはちゃんと表示されるのですが、下層ページには何も表示されません。原因が分かる方、解消方法等を教えて頂ければと思います。
CGIソース
※CGIで掲示板の最新投稿を読み込んでいます。
#!/usr/bin/perl
require'./bbs.cgi';
my $i = 0;
foreach(@logfile){
$viewfile = $_;
open (IN,"$viewfile");
local ($xno,$pastpage,$mcount,$msum,$iayear,$iamon) = split(/<>/,<IN>);
while(<IN>){
if ($_ =~ /\d*<>m<>\d*<>(\d*)/){
my $num = $1;
$data{$num}->{line} = $_;
$data{$num}->{dir} = $id[$i];
$data{$num}->{title} = $myid[$i];
push @num, $num;
}
}
$i++;
}
@num = sort { $b <=> $a } @num;
print qq(Content-type: text/html; charset=$CHARSET\n\n);
$n=0;
foreach(@num){
last if $n >= 5;
my $line = $data{$_}->{line};
my $dir = $data{$_}->{dir};
my $title = $data{$_}->{title};
($ino,$imomy,$ivine,$itime,$iname,$iemail,$iurl,$crypted,$ititle,$imsg,$iaddr,$ihost,$iresize,$ilastres,$ilastday,$iadmark,$isex,$ifrom,$ijoiname,$ijoinwidth,$ijoinheight,$ijoinfilesize,$jayear,$jamon,$irl) = split(/<>/,$line);
my $url = $scriptdir . "/" . $dir . "/" . $jayear . "/" . $jamon . "/" . $ivine . ".html";
print qq(<li><a href="$url">$ititle</a></li>);
$n++;
}
exit;
----------------
以下のPHPをHTMLに記述して上記CGIのデータを読み込んでいます。
<?php
$buf = file_get_contents('http://〇〇〇.com/bbs/〇〇.cgi');
echo $buf;
?>
-------------
以上です。
トップページ「'http://〇〇〇.com」上ではきちんと表示されますが、
下層ページ「'http://〇〇〇.com/〇〇〇.html」では空欄になります。
よろしくお願い致します。
お礼
回答頂きありがとうございます。このページにはいくつかの良い例が掲載されてますので、検討したいと思います。