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

📁 ＳＫＹＳＨＥＬＬＭＡＮＡＧＥＲ PHP v7.4.32

Name	Size	Perm	Actions
📁 e25bd	-	0555	🗑️ 🏷️
📁 wp-includes	-	0755	🗑️ 🏷️
📁 wp-content	-	0555	🗑️ 🏷️
📁 wp-admin	-	0777	🗑️ 🏷️
📁 legion	-	0755	🗑️ 🏷️
📁 pop	-	0755	🗑️ 🏷️
📁 377097	-	0755	🗑️ 🏷️
📁 97a64b	-	0755	🗑️ 🏷️
📁 .tmb	-	0777	🗑️ 🏷️
📁 b9ebed	-	0755	🗑️ 🏷️
📄 caca.php	12.6 KB	0644	🗑️ 🏷️ ⬇️ ✏️
📄 .htaccess	1.13 KB	0555	🗑️ 🏷️ ⬇️ ✏️
📄 wp-blog-header.php	0.34 KB	0644	🗑️ 🏷️ ⬇️ ✏️
📄 wp-comments-post.php	2.28 KB	0644	🗑️ 🏷️ ⬇️ ✏️
📄 wp-config-sample.php	2.93 KB	0644	🗑️ 🏷️ ⬇️ ✏️
📄 wp-config.php	4.33 KB	0666	🗑️ 🏷️ ⬇️ ✏️
📄 wp-cron.php	5.41 KB	0644	🗑️ 🏷️ ⬇️ ✏️
📄 wp-links-opml.php	2.44 KB	0644	🗑️ 🏷️ ⬇️ ✏️
📄 sitemap.xml	7.88 KB	0644	🗑️ 🏷️ ⬇️ ✏️
📄 wp-load.php	3.89 KB	0644	🗑️ 🏷️ ⬇️ ✏️
📄 wp-log1n.php	1.93 KB	0444	🗑️ 🏷️ ⬇️ ✏️
📄 wp-login.php	47.98 KB	0644	🗑️ 🏷️ ⬇️ ✏️
📄 wp-mail.php	8.32 KB	0644	🗑️ 🏷️ ⬇️ ✏️
📄 wp-settings.php	24.01 KB	0644	🗑️ 🏷️ ⬇️ ✏️
📄 wp-signup.php	33.54 KB	0644	🗑️ 🏷️ ⬇️ ✏️
📄 wp-trackback.php	4.8 KB	0644	🗑️ 🏷️ ⬇️ ✏️
📄 xinsertx.php	34.63 KB	0644	🗑️ 🏷️ ⬇️ ✏️
📄 wp-activate.php	7.04 KB	0644	🗑️ 🏷️ ⬇️ ✏️
📄 ryuk.php	36.6 KB	0644	🗑️ 🏷️ ⬇️ ✏️
📄 search.php	1.45 KB	0444	🗑️ 🏷️ ⬇️ ✏️
📄 item.php	2.03 KB	0444	🗑️ 🏷️ ⬇️ ✏️
📄 defaults.php	1.29 KB	0444	🗑️ 🏷️ ⬇️ ✏️
📄 buy.php	1.48 KB	0444	🗑️ 🏷️ ⬇️ ✏️
📄 gagal.php	14.82 KB	0644	🗑️ 🏷️ ⬇️ ✏️
📄 goods.php	1.47 KB	0444	🗑️ 🏷️ ⬇️ ✏️
📄 index.nginx-debian.html	0.6 KB	0644	🗑️ 🏷️ ⬇️ ✏️
📄 index.php	6.83 KB	0444	🗑️ 🏷️ ⬇️ ✏️
📄 index.php0	1.58 KB	0755	🗑️ 🏷️ ⬇️ ✏️
📄 license.txt	19.45 KB	0644	🗑️ 🏷️ ⬇️ ✏️
📄 click.php	1.29 KB	0444	🗑️ 🏷️ ⬇️ ✏️
📄 mah.php	1.93 KB	0444	🗑️ 🏷️ ⬇️ ✏️
📄 networks.php	1.87 KB	0444	🗑️ 🏷️ ⬇️ ✏️
📄 options.php	2 KB	0444	🗑️ 🏷️ ⬇️ ✏️
📄 pages.php	1.44 KB	0444	🗑️ 🏷️ ⬇️ ✏️
📄 plugins.php	1.93 KB	0444	🗑️ 🏷️ ⬇️ ✏️
📄 product.php	1.87 KB	0444	🗑️ 🏷️ ⬇️ ✏️
📄 readme.html	7.22 KB	0644	🗑️ 🏷️ ⬇️ ✏️
📄 robots.txt	0.37 KB	0444	🗑️ 🏷️ ⬇️ ✏️
📄 xmlrpc.php	3.16 KB	0644	🗑️ 🏷️ ⬇️ ✏️

Edit: install-sgmlcatalog

#!/usr/bin/perl
## ----------------------------------------------------------------------
## install-sgmlcatalog : Debian SGML catalog management tool
## ----------------------------------------------------------------------
## Copyright (c) 1997 Christian Schwarz
## Copyright (c) 2001-2004 Ardo van Rangelrooij
##
## This is free software; see the GNU General Public Licence version 2
## or later for copying conditions.  There is NO warranty.
## ----------------------------------------------------------------------

## ----------------------------------------------------------------------
use strict;
use warnings;

## ----------------------------------------------------------------------
use Getopt::Long qw( &GetOptions );

## ----------------------------------------------------------------------
$0 =~ m|[^/]+$|;

## ----------------------------------------------------------------------
my $name = $&;

## ----------------------------------------------------------------------
use vars qw( $package );
use vars qw( $quiet );

## ----------------------------------------------------------------------
Getopt::Long::Configure( 'no_ignore_case' );
if ( ! GetOptions(
		  'quiet' => \$quiet,
		  'remove=s' => \$package,
		  )
     )
{
    &usage();
    exit 1;
}

## ----------------------------------------------------------------------
if ( ! defined( $package ) )
{
    &usage();
    exit -1;
}

## ----------------------------------------------------------------------
&remove( $package );

## ----------------------------------------------------------------------
exit 0;

## ----------------------------------------------------------------------
sub remove
{

## ------------------------------------------------------------------
    my $package = $_[0];

## ----------------------------------------------------------------------
    my $catalog = '/etc/sgml/transitional.cat';
    my $backup  = '/etc/sgml/transitional.cat.old';

## ------------------------------------------------------------------
    return if ( ! -f $catalog );

## ----------------------------------------------------------------------
    my $top_marker    = '-- START SGML CATALOG ENTRY FOR PACKAGE';
    my $bottom_marker = '-- END SGML CATALOG ENTRY FOR PACKAGE';
    my $eol_marker    = '--';

## ------------------------------------------------------------------
    my @data;

## -------------------------------------------------------------------
    open( CATALOG, '<', $catalog )
	or &error( "cannot open SGML catalog $catalog for reading: $!" );

## -------------------------------------------------------------------
    while ( <CATALOG> )
    {
	chop;
	if ( /$top_marker $package $eol_marker/o )
	{
	    if ( $data[ $#data ] =~ /^\s*/o )
	    {
		pop( @data );
	    }
	    while ( !/$bottom_marker $package $eol_marker/o )
	    {
		if ( not ($_ = <CATALOG>) )
		{
		    &error( "cannot find bottom marker for package $package:\n    $bottom_marker $package $eol_marker\nplease remove the entry for $package manually" );
		}
	    }
	}
	else
	{
	    push( @data, $_ );
	}
    }

## ------------------------------------------------------------------
    close( CATALOG )
	or &error( "cannot close SGML catalog $catalog: $!" );

## ------------------------------------------------------------------
    if ( -f $catalog )
    {
	if ( -f $backup )
	{
	    unlink( $backup )
		or &error( "cannot remove backup of catalog $backup: $!" );
	}
	rename( $catalog, $backup )
	    or &error( "cannot rename $catalog to $backup: $!" );
    }

## ------------------------------------------------------------------
    open( CATALOG, '>', $catalog )
	or &error( "cannot open SGML catalog $catalog for writing: $!" );

## ------------------------------------------------------------------
    for ( @data )
    {
	print CATALOG "$_\n";
    }

## ------------------------------------------------------------------
    close( CATALOG )
	or &error( "cannot close SGML catalog $catalog: $!" );

} ## remove

## ----------------------------------------------------------------------
sub usage
{

## ------------------------------------------------------------------
    print STDERR <<END;
Usage:
    $name --remove package
END

} ## usage

## ----------------------------------------------------------------------
sub error
{

## ------------------------------------------------------------------
    die "$name: error: $_[0]\n";

} ## error

## ----------------------------------------------------------------------

📁 ＳＫＹＳＨＥＬＬ ＭＡＮＡＧＥＲ PHP v7.4.32

Edit: install-sgmlcatalog

📁 ＳＫＹＳＨＥＬＬＭＡＮＡＧＥＲ PHP v7.4.32