#!/usr/local/cpanel/3rdparty/bin/perl
# cpanel - scripts/runweblogs Copyright 2018 cPanel, Inc.
# All rights Reserved.
# copyright@cpanel.net http://cpanel.net
# This code is subject to the cPanel license. Unauthorized copying is prohibited
use strict;
use warnings;
use Cpanel::Usage ();
local $| = 1;
Cpanel::Usage::usage( \@ARGV, \&usage );
print "Log checker loaded ok..\n";
my $user = $ARGV[0];
if ( $user && $user eq "" ) {
if ( -t STDIN ) {
print "What user's logs did you want to update? ";
$user = <STDIN>;
chomp($user);
}
else { die "stdin is not a tty and no user was given to us"; }
}
if ($user) {
$user =~ s/[\n\r\s]//g;
system( "/usr/local/cpanel/cpanellogd", "$user" );
}
else {
usage();
}
sub usage {
print <<EOF;
Usage: $0 <user> [--usage | --help]
Run statistics for a user.
where
user -- is a valid user name (required)
EOF
exit;
}
Copyright 2K16 - 2K18 Indonesian Hacker Rulez