[ SEA-GHOST MINI SHELL]
#!/usr/local/cpanel/3rdparty/bin/perl
# cpanel - scripts/checkusers Copyright 2022 cPanel, L.L.C.
# All rights reserved.
# copyright@cpanel.net http://cpanel.net
# This code is subject to the cPanel license. Unauthorized copying is prohibited
# This is really a placeholder for more extensive tests of system accounts required
# by cPanel.
print "Homedir: " . ( getpwnam('cpanel') )[7] . "\n";
if ( ( getpwnam('cpanel') )[7] eq '/usr/local/cpanel/cpanel' ) {
if ( -x '/usr/sbin/usermod' ) {
system '/usr/sbin/usermod', '-d', '/usr/local/cpanel', 'cpanel'; # order matters
}
elsif ( -x '/usr/sbin/pw' ) {
system '/usr/sbin/pw', 'usermod', 'cpanel', '-d', '/usr/local/cpanel'; # order matters
}
}
SEA-GHOST - SHELL CODING BY SEA-GHOST