如何在Perl中查找鏈接的內容類型？

Question

假設你有一個URL，http://site.com。如何在不下載它的情況下找出它的內容類型？ Perl的WWW::Mechanize或LWP是否可以發出HEAD請求？

Answer 1

可以使用LWP的head()方法在下列方式

use LWP::UserAgent; 
$ua = LWP::UserAgent->new; 
$ua->head('<url>'); 

Answer 2

這裏有一個完整的例子：

use LWP::UserAgent; 

$ua = LWP::UserAgent->new; 
my $response = $ua->head('http://www.perl.com'); 

my $type = $response->content_type; 

print "The type is $type\n"; 

一些服務器嗆HEAD請求，所以當我這樣做，得到的錯誤任何類型，我重試與GET請求，只請求頭幾百字節的資源。