#!/usr/local/cpanel/3rdparty/bin/perl
# cpanel - scripts/fixsubdomainlogs               Copyright(c) 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');