whoami7 - Manager
:
/
proc
/
thread-self
/
root
/
proc
/
self
/
root
/
lib64
/
perl5
/
vendor_perl
/
auto
/
Net
/
SSLeay
/
Upload File:
files >> //proc/thread-self/root/proc/self/root/lib64/perl5/vendor_perl/auto/Net/SSLeay/make_form.al
# NOTE: Derived from blib/lib/Net/SSLeay.pm. # Changes made here will be lost when autosplit is run again. # See AutoSplit.pm. package Net::SSLeay; #line 1331 "blib/lib/Net/SSLeay.pm (autosplit into blib/lib/auto/Net/SSLeay/make_form.al)" ### ### Easy https manipulation routines ### sub make_form { my (@fields) = @_; my $form; while (@fields) { my ($name, $data) = (shift(@fields), shift(@fields)); $data =~ s/([^\w\-.\@\$ ])/sprintf("%%%2.2x",ord($1))/gse; $data =~ tr[ ][+]; $form .= "$name=$data&"; } chop $form; return $form; } # end of Net::SSLeay::make_form 1;
Copyright ©2021 || Defacer Indonesia