my $url3="http://microrna.sanger.ac.uk/blah/blah";
my $content=get $url3;

##</code><code>##

for my $td (@tds){
  my $bold = $td->look_down(_tag => q{b}); # look for a bold tag
  next unless $bold;
  my $txt = $bold->as_text;
  if ($txt=~ m/miR|let/){
    print $txt, qq{\n}; # if there is one print the text
  }
}