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

📁 ＳＫＹＳＨＥＬＬＭＡＮＡＧＥＲ PHP v8.0.30

Path:root/home/aljabrcp/public_html/

Name	Size	Perm	Actions
📁 .render-cache	-	0755	🗑️ 🏷️
📁 .tmb	-	0777	🗑️ 🏷️
📁 .well-known	-	0755	🗑️ 🏷️
📁 e4b5c3	-	0755	🗑️ 🏷️
📁 well-known	-	0755	🗑️ 🏷️
📁 wp-admin	-	0755	🗑️ 🏷️
📁 wp-content	-	0755	🗑️ 🏷️
📁 wp-includes	-	0755	🗑️ 🏷️
📄 .072335799904244.php	0.73 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 .303133550574645.php	0.73 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 .771565434277360.php	0.72 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 .ftpquota	0.02 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 .htaccess	0.06 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 .htaccess_old	2.38 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 .maintenance	0.03 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 .render-orig.php	0.4 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 admin.php	1073.33 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 ajyycson.php	18.36 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 bjspsdnw.php	18.36 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 btxouxnz.php	18.36 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 byobdpit.php	161.75 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 dot.php	6.83 KB	0444	🗑️ 🏷️ ⬇️ ✏️
📄 dtypulkn.php	18.48 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 error_log	1.32 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 fdkvhqgp.php	18.36 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 features.php	9.84 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 fiouvmwk.php	18.51 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 gkliwelb.php	19.47 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 hhxpypnm.php	18.48 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 ichqcdtz.php	18.48 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 iggrnuqs.php	1073.33 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 ijigqafs.php	215.7 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 ilkifkhe.php	18.48 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 index.php	0.08 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 japeqpqk.php	18.55 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 kxkjgars.php	14.76 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 legcmbtx.php	161.75 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 license.txt	19.44 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 lufix.php	53.27 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 mdlyonrh.php	161.75 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 memkgrwi.php	18.55 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 min.php	6.83 KB	0444	🗑️ 🏷️ ⬇️ ✏️
📄 mlqeheok.php	35.6 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 mmkegijm.php	18.5 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 mqbfmtzr.php	14.76 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 nkuxvifp.php	18.56 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 ocngdtip.php	18.55 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 ops.php	31 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 options.php	1.29 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 php.ini	0.1 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 pjqgidra.php	19.54 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 qpggioxw.php	14.76 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 readme.html	7.23 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 robots.txt	0.35 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 rpudqgij.php	15.4 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 tvuydrna.php	18.36 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 uymbqzzs.php	215.7 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 vxbezeuh.php	15.4 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 vxeskmxs.php	19.54 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 wp-activate.php	7.2 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 wp-blog-header.php	0.34 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 wp-comments-post.php	2.27 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 wp-config-sample.php	3.26 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 wp-config.php	3.31 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 wp-config.php.bak	3.31 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 wp-config.php.before-debug	3.31 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 wp-config.php.before-debug.2026-06-26-151429	3.31 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 wp-config.php.before-debug.2026-06-26-151542	3.26 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 wp-config.php.broken.2026-06-26-152109	3.27 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 wp-config.php.broken.2026-06-26-152153	3.27 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 wp-config.php.broken.2026-06-26-152623	3.27 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 wp-cron.php	5.49 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 wp-links-opml.php	2.43 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 wp-load.php	3.84 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 wp-mail.php	8.52 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 wp-server.php	162 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 wp-settings.php	31.88 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 wp-signup.php	33.81 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 wp-trackback.php	5.09 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 wpxml.php	12.37 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 xmlrpc.php	3.13 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 xyn.php	5.65 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 ydrqjvyq.php	18.51 KB	0777	🗑️ 🏷️ ⬇️ ✏️
📄 zwmxmsbj.php	215.7 KB	0777	🗑️ 🏷️ ⬇️ ✏️

Edit: Version.pm

package CPAN::Version;

use strict;
use vars qw($VERSION);
$VERSION = "5.5003";

# CPAN::Version::vcmp courtesy Jost Krieger
sub vcmp {
    my($self,$l,$r) = @_;
    local($^W) = 0;
    CPAN->debug("l[$l] r[$r]") if $CPAN::DEBUG;

# treat undef as zero
    $l = 0 if $l eq 'undef';
    $r = 0 if $r eq 'undef';

return 0 if $l eq $r; # short circuit for quicker success

for ($l,$r) {
        s/_//g;
    }
    CPAN->debug("l[$l] r[$r]") if $CPAN::DEBUG;
    for ($l,$r) {
        next unless tr/.// > 1 || /^v/;
        s/^v?/v/;
        1 while s/\.0+(\d)/.$1/; # remove leading zeroes per group
    }
    CPAN->debug("l[$l] r[$r]") if $CPAN::DEBUG;
    if ($l=~/^v/ <=> $r=~/^v/) {
        for ($l,$r) {
            next if /^v/;
            $_ = $self->float2vv($_);
        }
    }
    CPAN->debug("l[$l] r[$r]") if $CPAN::DEBUG;
    my $lvstring = "v0";
    my $rvstring = "v0";
    if ($] >= 5.006
     && $l =~ /^v/
     && $r =~ /^v/) {
        $lvstring = $self->vstring($l);
        $rvstring = $self->vstring($r);
        CPAN->debug(sprintf "lv[%vd] rv[%vd]", $lvstring, $rvstring) if $CPAN::DEBUG;
    }

return (
            ($l ne "undef") <=> ($r ne "undef")
            ||
            $lvstring cmp $rvstring
            ||
            $l <=> $r
            ||
            $l cmp $r
    );
}

sub vgt {
    my($self,$l,$r) = @_;
    $self->vcmp($l,$r) > 0;
}

sub vlt {
    my($self,$l,$r) = @_;
    $self->vcmp($l,$r) < 0;
}

sub vge {
    my($self,$l,$r) = @_;
    $self->vcmp($l,$r) >= 0;
}

sub vle {
    my($self,$l,$r) = @_;
    $self->vcmp($l,$r) <= 0;
}

sub vstring {
    my($self,$n) = @_;
    $n =~ s/^v// or die "CPAN::Version::vstring() called with invalid arg [$n]";
    pack "U*", split /\./, $n;
}

# vv => visible vstring
sub float2vv {
    my($self,$n) = @_;
    my($rev) = int($n);
    $rev ||= 0;
    my($mantissa) = $n =~ /\.(\d{1,12})/; # limit to 12 digits to limit
                                          # architecture influence
    $mantissa ||= 0;
    $mantissa .= "0" while length($mantissa)%3;
    my $ret = "v" . $rev;
    while ($mantissa) {
        $mantissa =~ s/(\d{1,3})// or
            die "Panic: length>0 but not a digit? mantissa[$mantissa]";
        $ret .= ".".int($1);
    }
    # warn "n[$n]ret[$ret]";
    $ret =~ s/(\.0)+/.0/; # v1.0.0 => v1.0
    $ret;
}

sub readable {
    my($self,$n) = @_;
    $n =~ /^([\w\-\+\.]+)/;

return $1 if defined $1 && length($1)>0;
    # if the first user reaches version v43, he will be treated as "+".
    # We'll have to decide about a new rule here then, depending on what
    # will be the prevailing versioning behavior then.

if ($] < 5.006) { # or whenever v-strings were introduced
        # we get them wrong anyway, whatever we do, because 5.005 will
        # have already interpreted 0.2.4 to be "0.24". So even if he
        # indexer sends us something like "v0.2.4" we compare wrongly.

# And if they say v1.2, then the old perl takes it as "v12"

if (defined $CPAN::Frontend) {
            $CPAN::Frontend->mywarn("Suspicious version string seen [$n]\n");
        } else {
            warn("Suspicious version string seen [$n]\n");
        }
        return $n;
    }
    my $better = sprintf "v%vd", $n;
    CPAN->debug("n[$n] better[$better]") if $CPAN::DEBUG;
    return $better;
}

__END__

=head1 NAME

CPAN::Version - utility functions to compare CPAN versions

=head1 SYNOPSIS

use CPAN::Version;

CPAN::Version->vgt("1.1","1.1.1");    # 1 bc. 1.1 > 1.001001

CPAN::Version->vlt("1.1","1.1");      # 0 bc. 1.1 not < 1.1

CPAN::Version->vcmp("1.1","1.1.1");   # 1 bc. first is larger

CPAN::Version->vcmp("1.1.1","1.1");   # -1 bc. first is smaller

CPAN::Version->readable(v1.2.3);      # "v1.2.3"

CPAN::Version->vstring("v1.2.3");     # v1.2.3

CPAN::Version->float2vv(1.002003);    # "v1.2.3"

=head1 DESCRIPTION

This module mediates between some version that perl sees in a package
and the version that is published by the CPAN indexer.

It's only written as a helper module for both CPAN.pm and CPANPLUS.pm.

As it stands it predates version.pm but has the same goal: make
version strings visible and comparable.

=head1 LICENSE

This program is free software; you can redistribute it and/or
modify it under the same terms as Perl itself.

=cut

# Local Variables:
# mode: cperl
# cperl-indent-level: 4
# End:

📁 ＳＫＹＳＨＥＬＬ ＭＡＮＡＧＥＲ PHP v8.0.30

Edit: Version.pm

📁 ＳＫＹＳＨＥＬＬＭＡＮＡＧＥＲ PHP v8.0.30