chpmv

#!/usr/bin/env perl

##
# モジュールのバージョンをしらべる
# ./chpmv Moose Mouse Any::Moose Data::Dumper ...

use warnings;
use strict;
use 5.009004;
use Module::Load;

die unless @ARGV;

foreach my $module (@ARGV) {
    eval { load $module; };

    if ($@) { print "$module not found\n" }
    else    { print $module, ' ', $module->VERSION, "\n" }
}