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元素而异（即在每次迭代中，将 div之前的 table元素替换为 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的定义。您在商业广告前面插入了一个反斜杠，该反斜杠不属于该反斜杠。