#!/usr/bin/env perl

use App::Mver;
use Pod::Usage;
use Getopt::Long;

GetOptions(
    \my %opts,
    'help|h',
    'no-internet|n',
);
my @modules = grep { not /^-/ } @ARGV;

usage()  unless @modules;
usage(2) if $opts{help};

App::Mver::run(\@modules, \%opts);

exit 0;

sub usage { pod2usage(-verbose => $_[0]) }

__END__

=head1 NAME

mver - little handy tool to quickly get versions of installed modules

=head1 SYNOPSIS

    mver --options Module::Name1 Module::Name2

=head1 OPTIONS

=over 4

=item --no-internet (-n)

Disable MetaCPAN API querying.

=item --help (-h)

Show this message.

=back

=head1 AUTHOR

Alexey Surikov E<lt>ksuri@cpan.orgE<gt>

=head1 LICENSE

This program is free software, you can redistribute it under the same terms as Perl itself.
