perl - Xpath找不到ID

Question

我无法通过其ID获取节点。
代码简单明了，应该是不言自明的。

#!/usr/bin/perl
use Encode; 
use utf8;
use LWP::UserAgent;   
use URI::URL; 
use Data::Dumper;
use HTML::TreeBuilder::XPath;

my $url = 'https://www.airbnb.com/rooms/1976460';
my $browser = LWP::UserAgent->new;
my $resp = $browser->get( $url, 'User-Agent' => 'Mozilla\/5.0' );

if ($resp->is_success) {
    my $base = $resp->base || '';
    print "-> base URL: $base\n";
    my $data = $resp->decoded_content;

    my $tree= HTML::TreeBuilder::XPath->new;
    $tree->parse_content( $resp->decoded_content() );
    binmode STDOUT, ":encoding(UTF-8)";
    my $price_day = $tree->find('.//*[@id="price_amount"]/');
    print Dumper($price_day);

    $tree->delete();
}

上面的代码打印：

-> base URL: https://www.airbnb.com/rooms/1976460
$VAR1 = undef;

如何通过其ID选择节点？

提前致谢。

Answer 1

将那个/从该XPath的末尾删除。

.//*[@id="price_amount"]

应该做。实际上，它不是有效的XPath。