原因不明の症状に悩んでおります・・・。
申し訳ありませんがご助言をお願いできませんでしょうか。

1: Perlスクリプトで色んなサイトのhtmlソースを一気に取得してきたい。
2: それでこんな風にやってみました。

　※メインのスクリプトにて
　foreach(@url_list){　# @url_listに各サイトのurlが入っている。
　@source = &get($_);

　（いろいろな処理）

　}

　※サブルーチン（別ファイル）にて
　sub get{

　（socketを使ってソースを取得し、@backに格納）

　return(@back);
　}

3: うまくいかないサイトがちらほらあります。
　＜付加的情報＞
　・問題なく取得できるサイトも多くある。
　・Hostヘッダは送っている（＝バーチャルホストが原因ではない？）。
　・うまくいかないサイトでも、サブルーチン内ではそのソースをprintできる。
　（＝実は取得できている？）

　＜自分の考え＞
　・特定のサイトの時だけ、メインのスクリプトに@backが帰って来ない？
　・特定のサイトの時だけ、そもそもサブルーチン内で配列に格納されていない？