Skip to content

Instantly share code, notes, and snippets.

What would you like to do?
Simple program to find CPAN distributions by an author that do not include information about a bugtracker
use strict;
use warnings;
use feature 'say';
use MetaCPAN::Client;
my $author_name = shift
or die "Usage: $0 CPAN_AUTHOR_ID\n";
my $mcpan = MetaCPAN::Client->new;
my $author = $mcpan->author($author_name);
my $releases = $author->releases;
while ( my $rel = $releases->next ) {
next if $rel->resources->{bugtracker}{web};
say 'Distribution ', $rel->distribution,
' does not include bugtracker information';
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment