File: 07_rt114345.t

package info (click to toggle)
libhtml-selector-xpath-perl 0.28-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 260 kB
  • sloc: perl: 1,716; makefile: 2
file content (18 lines) | stat: -rw-r--r-- 308 bytes parent folder | download | duplicates (5) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
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
//b
--- xpath
//b