File Coverage

blib/lib/HTML/WidgetValidator/Widget/SlideShare.pm
Criterion Covered Total %
statement 9 9 100.0
branch n/a
condition n/a
subroutine 3 3 100.0
pod n/a
total 12 12 100.0


line stmt bran cond sub pod time code
1             package HTML::WidgetValidator::Widget::SlideShare;
2 1     1   4 use strict;
  1         2  
  1         26  
3 1     1   4 use warnings;
  1         2  
  1         21  
4 1     1   4 use base qw(HTML::WidgetValidator::Widget);
  1         2  
  1         202  
5            
6             our $VERSION = '0.01';
7            
8             __PACKAGE__->name('SlideShare');
9             __PACKAGE__->url('http://www.slideshare.net/');
10             __PACKAGE__->models([
11             [
12             {
13             "name" => "object",
14             "type" => "start",
15             "attr" => {
16             "width" => qr{\d+},
17             "data" => qr{http://s3\.amazonaws\.com/slideshare/ssplayer\.swf\?id=\d+&doc=[a-z0-9-]+},
18             "type" => "application/x-shockwave-flash",
19             "height" => qr{\d+}
20             }
21             },
22             {
23             "name" => "param",
24             "type" => "start",
25             "attr" => {
26             "value" => qr{http://s3\.amazonaws\.com/slideshare/ssplayer\.swf\?id=\d+&doc=[a-z0-9-]+},
27             "name" => "movie"
28             }
29             },
30             {
31             "name" => "param",
32             "type" => "end"
33             },
34             {
35             "name" => "object",
36             "type" => "end"
37             }
38             ]
39             ]);
40            
41             1;
42            
43             __END__