PN¦jß<¦j@@¦j¤ysÙ°Accept-Encoding,User-Agent‚s B²"ƒ†Ã‹{ KEY: https://avaliareassessoria.com.br/Ven-C404/root/proc/3/cwd/var/cache/ea-nginx/proxy/avaliare/a/af/4e409748a9da2808495c30c0cb32fafa HTTP/1.1 200 OK Date: Sun, 13 Sep 2026 06:18:40 GMT Server: Apache Last-Modified: Sun, 13 Sep 2026 06:04:15 GMT Accept-Ranges: bytes Content-Length: 2670 Vary: Accept-Encoding,User-Agent Connection: close ïJ¦j}>Nbß<¦j>O6±¥–Accept-Encoding,User-AgentkE“Ho°Ó””=×(é KEY: http://avaliareassessoria.com.br/Ven-SS/root/proc/3/cwd/scripts/verify_pidfile HTTP/1.1 200 OK Date: Sun, 13 Sep 2026 06:04:14 GMT Server: Apache Last-Modified: Thu, 07 Apr 2022 01:29:33 GMT Accept-Ranges: bytes Content-Length: 2008 Vary: Accept-Encoding,User-Agent Connection: close Content-Type: text/plain #!/usr/local/cpanel/3rdparty/bin/perl # cpanel - scripts/verify_pidfile 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 use strict; use Cpanel::SafeFile (); use Cpanel::Services (); use IO::Handle (); my ( $user, $service, $pidfile, $regex ) = @ARGV; if ( !length $user || !length $service || !length $pidfile ) { usage(); exit 1; } my %args = ( 'user' => $user, 'service' => $service, ); if ( length $regex ) { $args{'regex'} = $regex; } my $time_boundary = time; my $ps_info_for = Cpanel::Services::get_running_process_info(%args); if ( !exists $ps_info_for->{$service} ) { print STDERR "$service does not appear to be running as user $user\n"; if ( $time_boundary > ( stat $pidfile )[9] ) { remove_pidfile($pidfile) if -e $pidfile; } exit 2; } if ( -e $pidfile ) { my $pid = read_pidfile($pidfile); if ( $ps_info_for->{$service}{'pid'} ne $pid ) { print STDERR "Pidfile for $service does not appear to match running pid $pid\n"; exit 3; } } else { print STDERR "$service is running but pidfile is missing\n"; exit 4; } exit 0; sub usage { print "Usage: $0 USER SERVICE PIDFILE [REGEX]\n"; } sub remove_pidfile { my ($pidfile) = @_; system 'rm', '-f', $pidfile; } sub read_pidfile { my ($pidfile) = @_; my $fh = IO::Handle->new(); my $lock = Cpanel::SafeFile::safeopen( $fh, '<', $pidfile ); if ( !$lock ) { print STDERR 'Unable to open pid file for reading: ' . $pidfile; exit 1; } my $pid = do { local $/; <$fh> }; if ( !Cpanel::SafeFile::safeclose( $fh, $lock ) ) { print STDERR 'Safeclose of pid file failed: ' . $pidfile; exit 1; } chomp $pid; return $pid; }