Linux iad1-shared-b7-18 6.6.49-grsec-jammy+ #10 SMP Thu Sep 12 23:23:08 UTC 2024 x86_64
Apache
: 67.205.6.31 | : 216.73.216.13
Cant Read [ /etc/named.conf ]
8.2.29
fernandoquevedo
Terminal
AUTO ROOT
Adminer
Backdoor Destroyer
Linux Exploit
Lock Shell
Lock File
Create User
CREATE RDP
PHP Mailer
BACKCONNECT
UNLOCK SHELL
HASH IDENTIFIER
README
+ Create Folder
+ Create File
/
usr /
share /
doc /
libxml-libxml-perl /
examples /
[ HOME SHELL ]
Name
Size
Permission
Action
complex
[ DIR ]
drwxr-xr-x
xmlns
[ DIR ]
drwxr-xr-x
article.xml
245
B
-rw-r--r--
article_bad.xml
215
B
-rw-r--r--
article_external_bad.xml
284
B
-rw-r--r--
article_internal.xml
836
B
-rw-r--r--
article_internal_bad.xml
838
B
-rw-r--r--
bad.dtd
38
B
-rw-r--r--
bad.xml
19
B
-rw-r--r--
catalog.xml
324
B
-rw-r--r--
cb_example.pl
1.13
KB
-rw-r--r--
create-sample-html-document.pl
5.02
KB
-rw-r--r--
dromeds.xml
410
B
-rw-r--r--
dtd.xml
111
B
-rw-r--r--
enc2_latin2.html
50
B
-rw-r--r--
enc_latin2.html
146
B
-rw-r--r--
ext_ent.dtd
48
B
-rw-r--r--
ns.xml
182
B
-rw-r--r--
test.dtd
581
B
-rw-r--r--
test.html
6.83
KB
-rw-r--r--
test.xhtml
7.07
KB
-rw-r--r--
test.xml
113
B
-rw-r--r--
test2.xml
13
B
-rw-r--r--
test3.xml
26
B
-rw-r--r--
test4.xml
115
B
-rw-r--r--
utf-16-1.html
184
B
-rw-r--r--
utf-16-2.html
354
B
-rw-r--r--
utf-16-2.xml
254
B
-rw-r--r--
xmllibxmldocs.pl
19.18
KB
-rw-r--r--
xpath.pl
1
KB
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : xpath.pl
#!/usr/bin/perl # $Id$ use XML::LibXML; use strict; use warnings; my $parser = XML::LibXML->new(); my $xpath = shift @ARGV; if ( scalar @ARGV ) { foreach ( @ARGV ) { my $doc = $parser->parse_file( $_ ); my $result = $doc->find( $xpath ); handle_result( $result ); undef $doc; } } else { # read from std in my @doc = <STDIN>; my $string = join "", @doc; my $doc = $parser->parse_string( $string ); my $result = $doc->find( $xpath ); exit handle_result( $result ); } sub handle_result { my $result = shift; return 1 unless defined $result; if ( $result->isa( 'XML::LibXML::NodeList' ) ) { foreach ( @$result ) { print $_->toString(1) , "\n"; } return 0; } if ( $result->isa( 'XML::LibXML::Literal' ) ) { print $result->value , "\n"; return 0; } if ( $result->isa( 'XML::LibXML::Boolean' ) ){ print $result->to_literal , "\n"; return 0; } return 1; }
Close
