任意のURLのHTMLタグを表示するにはどうしたらいいのでしょうか？

[上に] [前に] [次に]
まこと [E-Mail] [HomePage] 1999/07/21(水) 03:47:11
はじめまして、まことというものです。（＾＾）
いま僕はドリームキャストを使用して自作のCGIの設置を
試みているのですが、（物凄く初心者です（＾＾；；；）
自分の好きなHPのHTMLタグを表示出来る物を作ってみたくて、
いま、とりあえずファイルの読み込みをやってみているのですが
どうしてもうまくいきません。。。（涙）
（サーバーエラーにはなってないです）
下のように書いているのですが、どこか間違えているのでしょうか？

--------------------------------------------------
#!/usr/local/bin/perl

open(IN, "http://www.geocities.co.jp/HeartLand/7419/index.html");
while ($test = <IN>) { print $test; }
close(IN);

print <<to_END;
Content-type: text/html

この下に表示する。
<br><br>
$test

to_END

--------------------------------------------------
↑こんな感じです。
最終的には、フォームに入力したURLのページのHTMLタグを
textarea内に表示出来るようにしたいと思っています。
長くなってしまってすいません。どうかよろしくお願いします。
まこと [E-Mail] [HomePage] 1999/07/21(水) 03:50:59
すいません。m(_ _)m
表示がおかしくなっていました。
&lt;のところは『<』で、
&gt;のところは『>』でした。（汗）
まこと [E-Mail] [HomePage] 1999/07/21(水) 04:03:16
連続して発言してしまってすいません。（＾＾；；；
やっぱりみずらくなってしまったので、
もう一度書き直してみます。
どうかよろしくお願いします。


ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー
#!/usr/local/bin/perl

open(IN, "http://表示したいＵＲＬ");
while ($test = <IN>) { print $test; }
close(IN);

print <<to_END;
Content-type: text/html

この下に表示する。
<br><br>
$test

to_END
B-Cus 1999/07/21(水) 04:05:00
1. 普通他のサーバのファイルはopenできません。
　　../199808/98080006.htm
　　../199901/99010332.htm
　　../199808/98080053.htm
　　../199907/99070163.htm
　そのopenは失敗してます。
2. HTMLをHTMLとして表示してちゃ、普通にブラウズしているのと変わりませんよ。
　　s/</&lt;/ s/>/&gt;/
　とするとか、
　　Content-type: text/plain
　とするとか。
3. 全体的にアルゴリズムが変です。がんばってデバッグしてください。
まこと [E-Mail] 1999/07/21(水) 10:57:17
[[解決]]
どうもありがとうございました。（＾＾）
これからもお世話になることがあるかも知れませんが、
その時はまたどうかよろしくお願いします。
それでは、
(^^)/~~~~
[上に] [前に] [次に]