#!/usr/bin/perl

use strict;

my $module = shift;
my $minimum = shift;

my($result, $version, $versionvar);

#print "Checking installation status of Perl module $module...\n";

$versionvar = $module . "::VERSION";
$version = eval "require $module and defined \$$versionvar and \$$versionvar";
if ($@) {
  #print "Module $module is not installed.\n";
  exit(1);
}
if ($version >= $minimum) {
  #print "Module is installed and version number is okay\n";
  exit(0);
} else {
  #print "Module is installed but needs to be at least version $minimum (currently $version)\n";
  exit(1);
}

