File Coverage

blib/lib/HTML/Tree.pm
Criterion Covered Total %
statement 27 27 100.0
branch n/a
condition n/a
subroutine 9 9 100.0
pod 6 6 100.0
total 42 42 100.0


line stmt bran cond sub pod time code
1             package HTML::Tree;
2              
3             # ABSTRACT: build and scan parse-trees of HTML
4              
5             # HTML::Tree is basically just a happy alias to HTML::TreeBuilder.
6              
7 1     1   16130 use warnings;
  1         2  
  1         25  
8 1     1   5 use strict;
  1         1  
  1         26  
9              
10             our $VERSION = '5.910'; # TRIAL VERSION from OurPkgVersion
11              
12 1     1   479 use HTML::TreeBuilder ();
  1         3  
  1         128  
13              
14              
15             sub new {
16 4     4 1 10475 shift;
17 4         18 unshift @_, 'HTML::TreeBuilder';
18 4         27 goto &HTML::TreeBuilder::new;
19             }
20              
21             sub new_from_file {
22 3     3 1 8503 shift;
23 3         12 unshift @_, 'HTML::TreeBuilder';
24 3         17 goto &HTML::TreeBuilder::new_from_file;
25             }
26              
27             sub new_from_content {
28 3     3 1 7559 shift;
29 3         10 unshift @_, 'HTML::TreeBuilder';
30 3         18 goto &HTML::TreeBuilder::new_from_content;
31             }
32              
33             sub new_from_string {
34 2     2 1 6776 shift;
35 2         7 unshift @_, 'HTML::TreeBuilder';
36 2         10 goto &HTML::TreeBuilder::new_from_string;
37             }
38              
39             sub new_from_url {
40 4     4 1 74200 shift;
41 4         15 unshift @_, 'HTML::TreeBuilder';
42 4         19 goto &HTML::TreeBuilder::new_from_url;
43             }
44              
45             sub new_from_http {
46 1     1 1 5273 shift;
47 1         3 unshift @_, 'HTML::TreeBuilder';
48 1         5 goto &HTML::TreeBuilder::new_from_http;
49             }
50              
51             1;
52              
53             __END__