#!/usr/bin/perl

my $CORE = `/usr/local/cpanel/cpconf --core`;
chomp($CORE);

if (   $CORE
    && !-e '/usr/local/cpanel/perl/' . $CORE . '/Config.pm'
    && -f '/usr/local/cpanel/perl/' . $CORE ) {
    rename '/usr/local/cpanel/perl/' . $CORE, '/usr/local/cpanel/perl/' . $CORE . '.tmp';
    mkdir '/usr/local/cpanel/perl/' . $CORE, 0755;
    rename '/usr/local/cpanel/perl/' . $CORE . '.tmp', '/usr/local/cpanel/perl/' . $CORE . '/Config.pm';
}