如何在Perl中找到链接的内容类型？

use strict;
use warnings;
use LWP::UserAgent;

my $url = "https://example.com";
my $ua = LWP::UserAgent->new;
my $response = $ua->head($url);

if ($response->is_success) {
    my $content_type = $response->content_type;
    print "Content type of $url is $content_type\n";
} else {
    print "Error: " . $response->status_line . "\n";
}