perl - perl http リクエスト、出力を切り詰める方法

Question

次のような呼び出しを使用して、perl を使用してテキスト ファイルをオンラインで読み取ろうとしています。

$output = $ua->request($req)->as_string;

問題は、出力に不要なゴミがたくさん含まれていることです。

HTTP/1.1 200 OK
Connection: close
Date: 
etc...

出力を切り捨てて、ファイルの内容のみを取得する方法はありますか?

Answer 1

問題は、単純に応答オブジェクトを取得しLWP::UserAgentて文字列としてダンプしていることです。コンテンツだけを取得したい場合：

# Get the response
$response = $ua->request($req);
# Get the content portion of the response
$output = $response->content;

すべてが白黒で表示されます: https://metacpan.org/pod/HTTP::Request