SILENT KILLERPanel

Current Path: > > usr > share > > Modules > init


Operation   : Linux premium131.web-hosting.com 4.18.0-553.44.1.lve.el8.x86_64 #1 SMP Thu Mar 13 14:29:12 UTC 2025 x86_64
Software     : Apache
Server IP    : 162.0.232.56 | Your IP: 216.73.216.111
Domains      : 1034 Domain(s)
Permission   : [ 0755 ]

Files and Folders in: //usr/share//Modules/init

NameTypeSizeLast ModifiedActions
ksh-functions Directory - -
zsh-functions Directory - -
bash File 4134 bytes October 14 2023 18:46:13.
bash_completion File 11464 bytes October 14 2023 18:46:13.
cmake File 1925 bytes October 14 2023 18:46:13.
csh File 3874 bytes October 14 2023 18:46:13.
fish File 1733 bytes October 14 2023 18:46:13.
fish_completion File 9647 bytes October 14 2023 18:46:13.
ksh File 4162 bytes October 14 2023 18:46:13.
lisp File 3230 bytes October 14 2023 18:46:13.
perl.pm File 1118 bytes October 14 2023 18:46:13.
profile-compat.csh File 197 bytes October 14 2023 18:46:13.
profile-compat.sh File 309 bytes October 14 2023 18:46:13.
profile.csh File 105 bytes October 14 2023 18:46:13.
profile.sh File 448 bytes October 14 2023 18:46:13.
python.py File 1539 bytes October 14 2023 18:46:13.
r.R File 961 bytes October 14 2023 18:46:13.
ruby.rb File 1379 bytes October 14 2023 18:46:13.
sh File 4004 bytes October 14 2023 18:46:13.
tcl File 1071 bytes October 14 2023 18:46:13.
tcsh File 3880 bytes October 14 2023 18:46:13.
tcsh_completion File 5521 bytes October 14 2023 18:46:13.
zsh File 4151 bytes October 14 2023 18:46:13.

Reading File: //usr/share//Modules/init/perl.pm

# define modules runtine quarantine configuration
$ENV{'MODULES_RUN_QUARANTINE'} = 'LD_LIBRARY_PATH LD_PRELOAD';

# setup quarantine if defined
my $_mlre = '';
if (defined $ENV{'MODULES_RUN_QUARANTINE'}) {
  foreach my $_mlv (split(' ', $ENV{'MODULES_RUN_QUARANTINE'})) {
     if ($_mlv =~ /^[A-Za-z_][A-Za-z0-9_]*$/) {
        if (defined $ENV{$_mlv}) {
           $_mlre .= "${_mlv}_modquar='$ENV{$_mlv}' ";
        }
        my $_mlrv = "MODULES_RUNENV_$_mlv";
        $_mlre .= "$_mlv='$ENV{$_mlrv}' ";
    }
  }
  if ($_mlre ne "") {
     $_mlre = "env $_mlre";
  }
}

eval `${_mlre}/usr/bin/tclsh /usr/share/Modules/libexec/modulecmd.tcl perl autoinit`;

# clean temp variable used to setup quarantine
undef $_mlre;

# redefine module command if compat version has been activated
if ($ENV{'MODULES_USE_COMPAT_VERSION'} eq '1') {
   $ENV{'MODULES_CMD'} = '/usr/share/Modules/libexec/modulecmd-compat';
   { no warnings 'redefine';
      *module = sub {
         eval `/usr/share/Modules/libexec/modulecmd-compat perl @_`;
         # return value as done on new main version
         return 1;
      };
   }
}

1;

SILENT KILLER Tool