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   36292 use warnings;
  1         2  
  1         40  
8 1     1   6 use strict;
  1         7  
  1         51  
9              
10             our $VERSION = '5.909'; # TRIAL VERSION from OurPkgVersion
11              
12 1     1   1014 use HTML::TreeBuilder ();
  1         5  
  1         273  
13              
14              
15             sub new {
16 4     4 1 31702 shift;
17 4         16 unshift @_, 'HTML::TreeBuilder';
18 4         30 goto &HTML::TreeBuilder::new;
19             }
20              
21             sub new_from_file {
22 3     3 1 14122 shift;
23 3         12 unshift @_, 'HTML::TreeBuilder';
24 3         20 goto &HTML::TreeBuilder::new_from_file;
25             }
26              
27             sub new_from_content {
28 3     3 1 15691 shift;
29 3         14 unshift @_, 'HTML::TreeBuilder';
30 3         89 goto &HTML::TreeBuilder::new_from_content;
31             }
32              
33             sub new_from_string {
34 2     2 1 12574 shift;
35 2         10 unshift @_, 'HTML::TreeBuilder';
36 2         16 goto &HTML::TreeBuilder::new_from_string;
37             }
38              
39             sub new_from_url {
40 4     4 1 101158 shift;
41 4         17 unshift @_, 'HTML::TreeBuilder';
42 4         27 goto &HTML::TreeBuilder::new_from_url;
43             }
44              
45             sub new_from_http {
46 1     1 1 7423 shift;
47 1         4 unshift @_, 'HTML::TreeBuilder';
48 1         8 goto &HTML::TreeBuilder::new_from_http;
49             }
50              
51             1;
52              
53             __END__