PATH:
usr
/
share
/
lve
/
dbgovernor
/
scripts
/
Editing: cpanel-mysql-url-detect.pm
#!/bin/sh eval 'if [ -x /usr/local/cpanel/3rdparty/bin/perl ]; then exec /usr/local/cpanel/3rdparty/bin/perl -x -- $0 ${1+"$@"}; else exec /usr/bin/perl -x $0 ${1+"$@"}; fi;' if 0; #!/usr/bin/perl # cpanel - scripts/check_cpanel_rpms Copyright(c) 2015 cPanel, Inc. # All rights Reserved. # copyright@cpanel.net http://cpanel.net # This code is subject to the cPanel license. Unauthorized copying is prohibited package scripts::check_cpanel_rpms; # This script will handle repairing/listing broken RPMs # - # Q: What is a broken aka altered RPM? # A: Any files output by a rpm -vV RPM_PACKAGE_NAME that are listed to have a different MD5 sum or permission change indicate a broken RPM. use strict; use warnings; BEGIN { unshift @INC, '/usr/local/cpanel'; } use Cpanel::CleanINC (); use Cpanel::Usage (); use Cpanel::Update::Logger (); use Cpanel::RPM::Versions::File (); use Cpanel::Sys::Hostname (); use Cpanel::TempFile (); my ($name, $release) = @ARGV; if (not defined $name) { print ""; exit(1); } if (not defined $release) { print ""; exit(1); } my $logger = Cpanel::Update::Logger->new( { 'stdout' => 0, 'log_level' => 'info' } ); my @targets = qw(MySQL50 MySQL51 MySQL55 MySQL56 MySQL57 MySQL80 MySQL84 MariaDB MariaDB100 MariaDB101 MariaDB102 MariaDB103 MariaDB104 MariaDB105 MariaDB106 MariaDB1011 MariaDB114); my $v = Cpanel::RPM::Versions::File->new( { 'only_targets' => \@targets, 'logger' => $logger } ); print $v->url($name, $release);
SAVE
CANCEL