Current Path : /proc/2/cwd/scripts/

Upload File :

Current File : //proc/2/cwd/scripts/runweblogs

#!/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