perl - 如何传递存储在变量中的xpath？

Question

my $V1 = $sel->get_text("//body[\@id='ext-gen3']/div[14]/div[2]/div/div/div/div/div/div/div/div/div/div[2]/div/div/table/tbody/tr/td/div/div");
print($V1 . "\n");

当我执行上述命令时，我可以毫无错误地打印 v1。

我的目标是打印这些值(比如 20 左右)。但每个变量的 xpath 仅因 div 元素而变化(即，table 之前的 div 元素应替换为 div[2] 、 和 div[2] 应在每次迭代中替换为 div[3]。

以下代码片段替换了 div[] 元素。但说xpath无效。

my $xpath = q(//body[\@id='ext-gen3']/div[14]/div[2]/div/div/div/div/div/div/div/div/div/div[2]/div/div/table/tbody/tr/td/div/div);  
for my $i (0,2) 
{     
my @nodes = split qr'/', $xpath;     
$nodes[16] .= "[$i]" unless 0 == $i;     
#say join '/', @nodes; }
my @somenames = join('/',@nodes);
#print "\n";
#print @somenames ;
foreach my $val (@somenames) {
    chomp($val);
    #my @new_arr = $sel->get_text($val);
    print "\n";
    print $val; ***this prints the xpath value which i needed***
    my $V1 = $sel->get_text("$val"); ***#i'm passing the same xpath here within double quotes but says as invalid xpath***
     print($V1 . "\n");
    my @new_arr = $sel->get_text("$val");
  } 
}

我是否遵循了错误的 xpath 传递方式？我该怎么做？

Answer 1

比较 XPath 字符串的定义 with mine in the previous answer 。您在不属于的广告前面插入了反斜杠。