my ($self,$tag,$attr) = @_;
  if($tag eq 'div' && $attr->{class} eq 'scroll'){
      $self->{search} = 1;
  }