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__
|