--- lib/Finance/Quote.pm.orig 2012-02-15 10:28:52.000000000 +0100 +++ lib/Finance/Quote.pm 2012-02-15 10:30:04.000000000 +0100 @@ -246,13 +246,15 @@ my $tb = HTML::TreeBuilder->new_from_content(decode_utf8($data)); # Find the <div> with the data - my $div = $tb->look_down('id','yfi_quote_summary_data'); + my $div = $tb->look_down('id','yfi_investing_content'); # Make sure there's a <div> to parse. return undef unless $div; - # The first <b> should contain the quote - my $rate_element=$div->look_down('_tag','b'); - # Make sure there's a <b> to parse. + # Find the <span> that contains the quote + my $lcfrom = lc($from); + my $lcto = lc($to); + my $rate_element=$div->look_down('id', "yfs_l10_$lcfrom$lcto=x"); + # Make sure there's a <span> to parse. return undef unless $rate_element; my $exchange_rate=$rate_element->as_text;