|
Server IP : 173.231.199.178 / Your IP : 216.73.216.46 Web Server : Apache System : Linux vps67388.inmotionhosting.com 3.10.0-1160.119.1.vz7.224.4 #1 SMP Mon Sep 30 15:36:27 MSK 2024 x86_64 User : koolde6 ( 1002) PHP Version : 8.1.34 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : ON Directory (0755) : /scripts/ |
| [ Home ] | [ C0mmand ] | [ Upload File ] |
|---|
#!/usr/local/cpanel/3rdparty/bin/perl
# cpanel - scripts/pwck 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
require Expect;
exit if ( !-x '/usr/sbin/pwck' );
my $exp = Expect->spawn("/usr/sbin/pwck")
or die "Cannot spawn pwck $!\n";
while (1) {
$exp->expect( 30, [ '\?', sub { $exp->send("yes\r"); } ], [ 'eof', sub { exit(); } ], [ 'timeout', sub { exit(); } ], 'default' );
}
my $pid = $exp->pid();
$exp->soft_close();
waitpid( $pid, 0 );