1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
|
use strict;
use Test::Base;
use HTML::Selector::XPath qw(selector_to_xpath);
plan tests => 1 * blocks;
filters { selector => 'chomp', xpath => 'chomp' };
run {
my $block = shift;
is selector_to_xpath($block->selector), $block->xpath, $block->selector;
}
__END__
===
--- selector
a:contains("s1")
--- xpath
//a[text()[contains(string(.),"s1")]]
===
--- selector
a:contains('s1')
--- xpath
//a[text()[contains(string(.),"s1")]]
===
--- selector
:not(a:contains("s3"))
--- xpath
//*[not(self::a[text()[contains(string(.),"s3")]])]
===
--- selector
:not(a:contains('s3'))
--- xpath
//*[not(self::a[text()[contains(string(.),"s3")]])]
|
