package Scraper;

sub scrape {
  my $self = shift;
  my $starting_page  = $self->{'strategy_class'}->starting_page();
  my $some_regex     = $self->{'strategy_class'}->some_regex();
  my $html_tree_spec = $self->{'strategy_class'}->html_tree_spec();
  # ... proceed to scrape using this config data
}


package Scraper::Yahoo;

sub starting_page  { 'www.yahoo.com/foo/' }

sub some_regex     { qr/foo(.*?)bar/ }

sub html_tree_spec { [ '_tag', 'div', 'id', 'headlines' ] }