如何在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请求，只请求头几百字节的资源。