Linux dpw.dpwebtech.com 3.10.0-1160.88.1.el7.x86_64 #1 SMP Tue Mar 7 15:41:52 UTC 2023 x86_64
Apache
: 192.232.243.69 | : 3.145.105.116
54 Domain
7.3.33
dpclient
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
/
.cpanplus /
5.16.3 /
build /
HTML-Tree-5.07 /
t /
[ HOME SHELL ]
Name
Size
Permission
Action
00-all_prereqs.t
2.71
KB
-rw-r--r--
00system.t
1007
B
-rw-r--r--
assubs.t
1.1
KB
-rw-r--r--
attributes.t
1.12
KB
-rw-r--r--
body.t
3.17
KB
-rw-r--r--
building.t
5.1
KB
-rw-r--r--
children.t
873
B
-rw-r--r--
clonei.t
516
B
-rw-r--r--
comment.t
417
B
-rw-r--r--
construct_tree.t
4.5
KB
-rw-r--r--
doctype.t
979
B
-rw-r--r--
escape.t
2.37
KB
-rw-r--r--
leaktest.t
5.66
KB
-rw-r--r--
oldparse.html
727
B
-rw-r--r--
oldparse.t
1.83
KB
-rw-r--r--
parents.t
2.57
KB
-rw-r--r--
parse.t
5.76
KB
-rw-r--r--
parsefile.t
1.87
KB
-rw-r--r--
refloop.t
2.05
KB
-rw-r--r--
sample.txt
37
B
-rw-r--r--
split.t
2.45
KB
-rw-r--r--
subclass.t
608
B
-rw-r--r--
tag-rendering.t
1.83
KB
-rw-r--r--
unicode.t
3.61
KB
-rw-r--r--
whitespace.t
983
B
-rw-r--r--
Delete
Unzip
Zip
${this.title}
Close
Code Editor : children.t
#!/usr/bin/perl -T # RT 21114 test case. Thanks Andrew Suhachov for finding it. use warnings; use strict; use Test::More tests => 3; use HTML::TreeBuilder; my $root = HTML::TreeBuilder->new(); my $escape = '<table><tr><td>One</td><td>Two</td></tr><tr><td>Three</td><td>Four</td></tr></table>'; my $html = $root->parse($escape)->eof; my $child = $root->look_down( _tag => 'tr', sub { my $tr = shift; $tr->look_down( _tag => 'td', _parent => $tr ) ? 1 : 0; } ); isa_ok( $child, 'HTML::Element', "Child found" ); my @children = $root->look_down( _tag => 'tr', sub { my $tr = shift; $tr->look_down( _tag => 'td', _parent => $tr ) ? 1 : 0; } ); cmp_ok( scalar(@children), '==', '2', "2 total children found" ); my $none = $root->look_down( _tag => 'tr', sub {0} ); ok( !defined($none), 'No children found' );
Close
