????
Current Path : /scripts/ |
Current File : //scripts/fixsubdomainlogs |
#!/usr/local/cpanel/3rdparty/bin/perl # cpanel - scripts/fixsubdomainlogs Copyright 2013 cPanel, Inc. # All rights Reserved. # copyright@cpanel.net http://cpanel.net # This code is subject to the cPanel license. Unauthorized copying is prohibited use Cpanel::Kill (); use Cpanel::Config::Users (); my @cpusers = Cpanel::Config::Users::getcpusers(); @cpusers = sort @cpusers; my $USERS_PER_BATCH = 256; while ( my @user_batch = splice( @cpusers, 0, $USERS_PER_BATCH ) ) { my @files = map { ( "/var/cpanel/lastrun/$_/stats", "/var/cpanel/lastrun/$_/bandwidth" ) } @user_batch; foreach my $user (@user_batch) { print "Resetting Logs for $user...Done\n"; } unlink(@files); } Cpanel::Kill::safekill('cpanellogd'); system('/usr/local/cpanel/cpanellogd');