MMCT TEAM
Server IP : 103.53.40.154  /  Your IP : 18.190.160.6
Web Server : Apache
System : Linux md-in-35.webhostbox.net 4.19.286-203.ELK.el7.x86_64 #1 SMP Wed Jun 14 04:33:55 CDT 2023 x86_64
User : ppcad7no ( 715)
PHP Version : 8.2.25
Disable Function : NONE
MySQL : OFF  |  cURL : ON  |  WGET : ON  |  Perl : ON  |  Python : ON
Directory (0755) :  /dev/../scripts/

[  Home  ][  C0mmand  ][  Upload File  ]

Current File : //dev/../scripts/pwck
#!/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 );

MMCT - 2023