URIからTitle取得

すごく簡単にHTMLからTitleをとりたい。
rightgo09/URI-Tag · GitHub
まだすごく適当だけど晒してしまう。
こんな感じ。

use URI::Tag;
my $title = URI::Tag->title('http://google.com'); #=> 'Google'

use URI::Tag;
my $ut = URI::Tag->new;
$ut->uri(URI->new('http://google.com'));
my $title = $ut->title; #=> 'Google'

Tagというからにはもっといろいろとれるようにしたい。