use warnings;
use strict;

use MetaCPAN::Client;

my $mc = MetaCPAN::Client->new;

my @modules = qw(
    Test::BrewBuild
    RPi::WiringPi
    Devel::Examine::Subs
);

for my $module_name (@modules){
    my $module_object = $mc->module($module_name);
    my $module_version = $module_object->version;

    print "$module_name: $module_version\n";
}