#!/usr/bin/perl

BEGIN {
    unshift @INC,'/usr/local/cpanel';
}

use Cpanel::OSSys ();

if ($pid = fork()) {
	exit;

} else {	
	for($i=0;$i<512;$i++) {
		Cpanel::OSSys::close($i);
	}
	Cpanel::OSSys::setsid();
	system("killall","-9","whostmgrd");
	system("/usr/local/cpanel/whostmgr/bin/whostmgrd");
}