use warnings;
use strict;

use MetaCPAN::Client;

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

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

for (@modules){
    printf "%s: %s\n", $_, $mc->module($_)->version;
}