3
の配列私はこのコードを持っている：私はリンクのARRAYを探しています、Perlの - ウェブ::スクレーパー - リンク
$VAR1 = {
'bc' => [
{
'link' => '/'
}
]
};
しかし：
#!/opt/local/bin/perl
use 5.014;
use warnings;
use Web::Scraper;
use Data::Dumper;
my $html = do { local $/; <DATA> };
my $br = scraper {
process 'div#br-wrap > ul', 'bc[]' => scraper {
process 'li > a', 'link' => '@href';
};
};
my $res = $br->scrape($html);
say Dumper($res);
__DATA__
<html>
<head><title>title</title></head>
<body>
<div id="content">
<div id="br-wrap">
<ul class="br">
<li><a href="/">Home</a></li>
<li><a href="/sub/xxx">Sub-xxx</a></li>
<li><a href="/sub/xxx/cat/name">Sub-Cat</a></li>
<li><a href="/sub/xxx/item">Sub-Item</a></li>
</ul>
</div>
</div>
</body>
</html>
結果があります。 ..
$VAR1 = {
'bc' => [
{
'link' => '/'
},
{
'link' => '/sub/xxx'
},
{
'link' => '/sub/xxx/cat/name'
},
{
'link' => '/sub/xxx/item'
}
]
};
コードのエラーはどこですか？
気を付けてくださった方は、この質問に間違いがないか教えてください。 – jm666
私はそれが良い質問の例だと言うことができます。 – zdim