One Hat Cyber Team
Your IP :
172.16.0.254
Server IP :
58.26.163.33
Server :
Windows NT DGPENSV2LPKMN 10.0 build 14393 (Windows Server 2016) AMD64
Server Software :
Apache/2.4.46 (Win64) OpenSSL/1.1.1h PHP/7.3.25
PHP Version :
7.3.25
Buat File
|
Buat Folder
Eksekusi
Dir :
C:
/
xampp7
/
perl
/
vendor
/
lib
/
SOAP
/
Lite
/
Deserializer
/
Edit File:
XMLSchemaSOAP1_1.pm
package SOAP::Lite::Deserializer::XMLSchemaSOAP1_1; use strict; our $VERSION = '1.27'; # VERSION sub anyTypeValue { 'ur-type' } sub as_boolean { shift; my $value = shift; $value eq '1' || $value eq 'true' ? 1 : $value eq '0' || $value eq 'false' ? 0 : die "Wrong boolean value '$value'\n" } sub as_base64 { shift; require MIME::Base64; MIME::Base64::decode_base64(shift) } sub as_ur_type { $_[1] } sub as_anyURI { $_[1] } BEGIN { no strict 'refs'; for my $method (qw( string float double decimal timeDuration recurringDuration uriReference integer nonPositiveInteger negativeInteger long int short byte nonNegativeInteger unsignedLong unsignedInt unsignedShort unsignedByte positiveInteger timeInstant time timePeriod date month year century recurringDate recurringDay language )) { my $name = 'as_' . $method; *$name = sub { $_[1] } } } 1;
Simpan