require HTML::TokeParser::Simple;
my $url = '[URL unfurl="true"]http://www.arsenal.com/';[/URL]
my $p = HTML::TokeParser::Simple->new( url => $url ) || die "Can't open: $!";
while (my $token = $p->get_tag('img')) {
print $token->get_attr('src')." => ".$token->get_attr('alt')."\n";
}