Select Code to Download

my @subcategories = ("Physics");
my %unique_pages;
...
  my $page_content = fetch_page($page);
  # ... stuff here ...
}

sub fetch_next_subcategory {
  my ($kernel, $heap) = @_[KERNEL, HEAP];
...
  # ... process page.
  $kernel->yield("fetch_next_article");
}