#!/usr/bin/perl

use warnings;
use strict;

my $version = `cat /etc/*-release | head -n 1`;
chomp $version;
my ($os) = $version =~ /(Ubuntu|CentOS)/;

my %rhel = (
    "DBI"       => "perl-Class-DBI-mysql.noarch",
    "DateTime"  => "perl-DateTime.x86_64",
);

if ($os eq 'CentOS'){
    foreach my $mod (keys %rhel){
        eval "use $mod";
        if($@){ 
            system("yum install $rhel{$mod} -y"); 
            eval "use $mod";
        }
    }
}