Linux server.nvwebsoft.co.in 3.10.0-1160.114.2.el7.x86_64 #1 SMP Wed Mar 20 15:54:52 UTC 2024 x86_64
Apache
: 162.240.12.249 | : 3.12.73.221
202 Domain
8.1.31
nbspublicschool
www.github.com/MadExploits
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
UNLOCK SHELL
HASH IDENTIFIER
CPANEL RESET
CREATE WP USER
README
+ Create Folder
+ Create File
/
usr /
lib64 /
perl5 /
vendor_perl /
Params /
Validate /
[ HOME SHELL ]
Name
Size
Permission
Action
Constants.pm
602
B
-rw-r--r--
PP.pm
19.01
KB
-rw-r--r--
XS.pm
972
B
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : XS.pm
package Params::Validate::XS; { $Params::Validate::XS::VERSION = '1.08'; } use strict; use warnings; my $default_fail = sub { require Carp; Carp::confess( $_[0] ); }; { my %defaults = ( ignore_case => 0, strip_leading => 0, allow_extra => 0, on_fail => $default_fail, stack_skip => 1, normalize_keys => undef, ); *set_options = \&validation_options; sub validation_options { my %opts = @_; my $caller = caller; foreach ( keys %defaults ) { $opts{$_} = $defaults{$_} unless exists $opts{$_}; } $Params::Validate::OPTIONS{$caller} = \%opts; } use XSLoader; XSLoader::load( __PACKAGE__, exists $Params::Validate::XS::{VERSION} ? ${ $Params::Validate::XS::{VERSION} } : (), ); } sub _check_regex_from_xs { return ( defined $_[0] ? $_[0] : '' ) =~ /$_[1]/ ? 1 : 0; } 1;
Close
