Yet Another CPAN Grep

WWW-Comix ( P/PO/POLETTIX/WWW-Comix-0.1.1.tar.gz, POLETTIX, 2008; MetaCPAN )

WWW-Comix/lib/WWW/Comix/Plugin/GoComics.pm ( view source; MetaCPAN )

r at '$uri'";
         return;
      }
      my $json = $res->decoded_content();

      # Build up response
      my @uris;
      while (
         $json =~ m{
               "page_url" \s*:\s*

e ($json =~ m{ )
      @uris = reverse sort @uris;

      # Prepare for next iteration
      ($year, $month) = ();        # exhausted by default
      if (@uris
         && (my ($previous) = $json =~