File Manager

X7ROOT File Manager

Current Path: /lib64/perl5

ðŸ“ ..
ðŸ“ B
ðŸ“„ B.pm(30.72 KB)
ðŸ“ CORE
ðŸ“„ Config.pm(3.12 KB)
ðŸ“„ Config.pod(250.68 KB)
ðŸ“„ Config_git.pl(409 B)
ðŸ“„ Config_heavy.pl(55.26 KB)
ðŸ“ Devel
ðŸ“„ DynaLoader.pm(24.63 KB)
ðŸ“„ Errno.pm(6.7 KB)
ðŸ“„ Fcntl.pm(3.95 KB)
ðŸ“ File
ðŸ“„ GDBM_File.pm(1.51 KB)
ðŸ“ Hash
ðŸ“ I18N
ðŸ“ IO
ðŸ“„ IO.pm(1.42 KB)
ðŸ“ IPC
ðŸ“„ NDBM_File.pm(2.44 KB)
ðŸ“„ O.pm(4.11 KB)
ðŸ“„ ODBM_File.pm(2.33 KB)
ðŸ“„ Opcode.pm(15.52 KB)
ðŸ“„ POSIX.pm(19.72 KB)
ðŸ“„ POSIX.pod(71.98 KB)
ðŸ“ PerlIO
ðŸ“„ SDBM_File.pm(3.46 KB)
ðŸ“ Sys
ðŸ“ Tie
ðŸ“ Time
ðŸ“„ _h2ph_pre.ph(28.57 KB)
ðŸ“„ arybase.pm(2.75 KB)
ðŸ“ asm
ðŸ“ asm-generic
ðŸ“„ attributes.pm(16.53 KB)
ðŸ“ auto
ðŸ“ bits
ðŸ“„ endian.ph(4.36 KB)
ðŸ“„ features.ph(13.37 KB)
ðŸ“ gnu
ðŸ“„ lib.pm(5.87 KB)
ðŸ“ linux
ðŸ“ machine
ðŸ“„ mro.pm(9.86 KB)
ðŸ“„ ops.pm(997 B)
ðŸ“„ perllocal.pod(10.7 KB)
ðŸ“„ re.pm(22.16 KB)
ðŸ“„ signal.ph(3.3 KB)
ðŸ“„ stdarg.ph(2.8 KB)
ðŸ“„ stdc-predef.ph(840 B)
ðŸ“„ stddef.ph(12.08 KB)
ðŸ“ sys
ðŸ“„ syscall.ph(86 B)
ðŸ“„ syslimits.ph(452 B)
ðŸ“„ syslog.ph(85 B)
ðŸ“ vendor_perl
ðŸ“„ wait.ph(83 B)

Editing: Config.pm

# This file was created by configpm when Perl was built. Any changes
# made to this file will be lost the next time perl is built.

# for a description of the variables, please have a look at the
# Glossary file, as written in the Porting folder, or use the url:
# http://perl5.git.perl.org/perl.git/blob/HEAD:/Porting/Glossary

package Config;
use strict;
use warnings;
use vars '%Config', '$VERSION';

$VERSION = "5.026003";

# Skip @Config::EXPORT because it only contains %Config, which we special
# case below as it's not a function. @Config::EXPORT won't change in the
# lifetime of Perl 5.
my %Export_Cache = (myconfig => 1, config_sh => 1, config_vars => 1,
		    config_re => 1, compile_date => 1, local_patches => 1,
		    bincompat_options => 1, non_bincompat_options => 1,
		    header_files => 1);

@Config::EXPORT = qw(%Config);
@Config::EXPORT_OK = keys %Export_Cache;

# Need to stub all the functions to make code such as print Config::config_sh
# keep working

sub bincompat_options;
sub compile_date;
sub config_re;
sub config_sh;
sub config_vars;
sub header_files;
sub local_patches;
sub myconfig;
sub non_bincompat_options;

# Define our own import method to avoid pulling in the full Exporter:
sub import {
    shift;
    @_ = @Config::EXPORT unless @_;

my @funcs = grep $_ ne '%Config', @_;
    my $export_Config = @funcs < @_ ? 1 : 0;

no strict 'refs';
    my $callpkg = caller(0);
    foreach my $func (@funcs) {
	die qq{"$func" is not exported by the Config module\n}
	    unless $Export_Cache{$func};
	*{$callpkg.'::'.$func} = \&{$func};
    }

*{"$callpkg\::Config"} = \%Config if $export_Config;
    return;
}

die "$0: Perl lib version (5.26.3) doesn't match executable '$^X' version ($])"
    unless $^V;

$^V eq 5.26.3
    or die sprintf "%s: Perl lib version (5.26.3) doesn't match executable '$^X' version (%vd)", $0, $^V;

sub FETCH {
    my($self, $key) = @_;

# check for cached value (which may be undef so we use exists not defined)
    return exists $self->{$key} ? $self->{$key} : $self->fetch_string($key);
}

sub TIEHASH {
    bless $_[1], $_[0];
}

sub DESTROY { }

sub AUTOLOAD {
    require 'Config_heavy.pl';
    goto \&launcher unless $Config::AUTOLOAD =~ /launcher$/;
    die "&Config::AUTOLOAD failed on $Config::AUTOLOAD";
}

# tie returns the object, so the value returned to require will be true.
tie %Config, 'Config', {
    archlibexp => '/usr/lib64/perl5',
    archname => 'x86_64-linux-thread-multi',
    cc => 'gcc',
    d_readlink => 'define',
    d_symlink => 'define',
    dlext => 'so',
    dlsrc => 'dl_dlopen.xs',
    dont_use_nlink => undef,
    exe_ext => '',
    inc_version_list => ' ',
    intsize => '4',
    ldlibpthname => 'LD_LIBRARY_PATH',
    libpth => '/usr/local/lib64 /lib64 /usr/lib64 /usr/local/lib /usr/lib /lib/../lib64 /usr/lib/../lib64 /lib',
    osname => 'linux',
    osvers => '4.18.0-425.3.1.el8.x86_64',
    path_sep => ':',
    privlibexp => '/usr/share/perl5',
    scriptdir => '/usr/bin',
    sitearchexp => '/usr/local/lib64/perl5',
    sitelibexp => '/usr/local/share/perl5',
    so => 'so',
    useithreads => 'define',
    usevendorprefix => 'define',
    version => '5.26.3',
};

X7ROOT File Manager

Editing: Config.pm

Upload File

Create Folder