Re: A line of code matches the question

Thank you first for the monks! Through the XML package we mentioned, I refer to the Athanasius given the code, made a more satisfactory changes. as follows:

use strict;
use warnings;
use XML::LibXML;
use Data::Dumper;

my $t = <<'EOF';
<!DOCTYPE html>
<html>
<head lang="en">
    <meta charset="UTF-8">
    <title></title>
    <script src="CssScriptLoader.js"></script>
    <script src="XZClass.js"></script>
</head>
<div id="224">
<p>aaa</p>
<p>aaa</p>
<p>axxxdsfosdaa</p>
<p>aaa</p>
</div>
<div id="724">
    <p>aaa22</p>
<p>22</p>
<p>22</p>
<p>aaa22</p>
<p>aaa22</p>
<p>aafsdfsdfa22</p>
</div>
<div id="284">
    <p>aaa33</p>
<p>aaa33</p>
<p>aaa33sdfsdfaom</p>
<p>aaa33</p>
<p>aaa33</p>
<p>aaa33</p>
</div>
</html>
EOF

my $dom = XML::LibXML->load_html(
    string  => \$t,
    recover   => 1,
    suppress_errors => 1,
);

my $xpath = '//div[@id="724"]/p';
print "$_\n" foreach $dom->findnodes($xpath)->to_literal_list;
[download]

Comment on Re: A line of code matches the question Download Code