Find out module exists or not

$system = system(perl -MModule::Name -e1);
if(defined(@system)) {
print "Module Exists\n";
}
else
{
print "Module does not exists\n";
}