Gecko [ www.foryou-vip.com ]

Linux vps-61133.fhnet.fr 4.9.0-19-amd64 #1 SMP Debian 4.9.320-2 (2022-06-30) x86_64
Apache/2.4.25 (Debian)
Server IP : 93.113.207.21 & Your IP : 216.73.216.35
Domains : Cant Read [ /etc/named.conf ]
User : www-data

Name	Size	Permission	Date
README.damemtop	638 B	-rwxrwxrwx	2018-06-03 11:37
damemtop	15.52 KB	-rwxrwxrwx	2018-06-03 11:37
damemtop.yaml	294 B	-rwxrwxrwx	2018-06-03 11:37
mc_slab_mover	7.63 KB	-rwxrwxrwx	2018-06-03 11:37
memcached-tool	5.56 KB	-rwxrwxrwx	2018-06-03 11:37
start-memcached	2.71 KB	-rwxrwxrwx	2018-06-03 11:37
systemd-memcached-wrapper	1.39 KB	-rwxrwxrwx	2018-06-03 11:37

Rename

#!/usr/bin/perl -w

# systemd-memcached-wrapper
# 2014 - Christos Trochalakis <yatiohi@idepolis.gr>
#
# Heavily based on start-memcached script by Jay Bonci
# <jaybonci@debian.org>
#
# This script handles the parsing of the /etc/memcached.conf file
# and was originally created for the Debian distribution.
# Anyone may use this little script under the same terms as
# memcached itself.

use strict;

if($> != 0 and $< != 0)
{
    print STDERR "Only root wants to run systemd-memcached-wrapper.\n";
    exit;
}

my $params; my $etchandle; my $etcfile = "/etc/memcached.conf";

# This script assumes that memcached is located at /usr/bin/memcached
my $memcached = "/usr/bin/memcached";

if (scalar(@ARGV) == 1) {
    $etcfile = shift(@ARGV);
}

# systemd capture stdout by default
my $ignore_directives = ("logfile");

if(open $etchandle, $etcfile)
{
    foreach my $line (<$etchandle>)
    {
        $line ||= "";
        $line =~ s/(?<!\\)\#[^\#]*//g;
        $line =~ s/\s+$//g;
        $line =~ s/^\s+//g;
        next unless $line;
        next if $line =~ /^\-[dh]/;

if($line =~ /^[^\-]/)
        {
            my ($directive, $arg) = $line =~ /^(.*?)\s+(.*)/;
	    next if(grep $directive, $ignore_directives);
        }

push @$params, $line;
    }

}else{
    $params = [];
}

push @$params, "-u root" unless(grep "-u", @$params);
$params = join " ", @$params;

exec "$memcached $params";
exit(0);