Simple program to find CPAN distributions by an author that do not include information about a bugtracker
#!/usr/bin/perl | |
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