perlを初めて一ヶ月程度の初心者ですが、いつもここで勉強させてもらっています。
今回、別サーバのHTMLファイルのソースを読込もうと思い、単純に

if (!open(IN,"http://192.168.1.1/index.html")) {
	&html_error('File Not Open','ファイルを開くことができません。');
}
@BASE = <IN>;
close(IN);

としたのですが、エラーの表示が出て開けませんでした。
過去ログにもありましたが、http:// から開くことは出来ないのでしょうか？

また、ローカルでは処理が出来るので、一度HTMLファイルをローカルにダウンロードしてから、
処理を実施しようと思ったのですが、ファイルをダウンロードする方法が思いつきません。
どうか、良い方法がありましたら、よろしくお願いします。

残念ながらopen関数にURLを引数として渡してやることはできません。

同じようなことをするにはwgetを使うかLWPモジュールを使いましょう。
ちなみにLWPはPure Perlなので@INCのパスが通っているところにLWP.pm
を転送すればそれで使えます。

またLWPはlibwww-perlという配布パッケージに入っています。

LWPの詳しい使い方はサーチエンジンで調べてください。

socketを使いたくないとき、わたしは、HTTP::Liteを使います。CPANからどうぞ。
ソケットを知らなくても使えます。

早速試したところ、無事に読み取ることが出来ました。
本当にありがとうございます。