: content_file 옵션을 사용하지 않고 응답을 파일로 처리하려면 어떻게합니까?

Question

예제 코드 :

my $ua = LWP::UserAgent->new; 
my $response = $ua->get('http://example.com/file.zip'); 
if ($response->is_success) { 
    # get the filehandle for $response->content 
    # and process the data 
} 
else { die $response->status_line } 

나는 이전에 디스크에 저장하지 않고 파일로 내용을 열어야합니다. 어떻게 할거 니?

Answer 1

스칼라를 가리키는 가짜 파일 핸들을 열 수 있습니다. file 인수가 스칼라 참조 인 경우 Perl은 스칼라의 내용을 파일 이름이 아닌 파일 데이터로 처리합니다. 여기

open my $fh, '<', $response->content_ref; 

while(<$fh>) { 
    # pretend it's a file 
} 

Answer 2

그렇진 파일을,하지만 관련 SO 질문 : What is the easiest way in pure Perl to stream from another HTTP resource?