Check for the existence of a Perl module

check_module

#!/usr/bin/perl
use strict;
eval "use $ARGV[0]";

my $path=$ARGV[0];
$path =~ s/::/\//g;
$path.='.pm';

my $location=$INC{$path};

print $location ? $location : "$ARGV[0] not installed";
print "\n";
exit;