use Web::Magic -sub=>'web';
say $_->title
  foreach web('http://www.w3.org/News/atom.xml')->entries;