Yet Another CPAN Grep

CPAN-Testers-WWW-Reports-Mailer ( B/BA/BARBIE/CPAN-Testers-WWW-Reports-Mailer-0.37.tar.gz, BARBIE, 2016; MetaCPAN )

CPAN-Testers-WWW-Reports-Mailer/lib/CPAN/Testers/WWW/Reports/Mailer.pm ( view source; MetaCPAN )

File::Path;
use File::Slurp;
use Getopt::ArgvFile default=>1;
use Getopt::Long;
use IO::File;
use JSON;
use LWP::UserAgent;
use Math::Random::MT;
use Metabase::Resource;
use MIME::Base64;
use MIME::Qu

   mode        => 'daily',
    mailrc      => 'data/01mailrc.txt'
);

my $sponsorfile = 'sponsors.json';

my (%AUTHORS,%PREFS,@SPONSORS,$MT,$IHEART,$serializer);

my %MODES = (
    daily   => { type =

rializer->new(
        detect_compression  => 1,
        detect_sereal       => 1,
        detect_json         => 1,
    );

    return $self;
}

sub check_reports {
    my $self = shift;
    my $mode