File Coverage

blib/lib/HTML/WidgetValidator/Widget/PostPet.pm
Criterion Covered Total %
statement 12 12 100.0
branch n/a
condition n/a
subroutine 4 4 100.0
pod n/a
total 16 16 100.0


line stmt bran cond sub pod time code
1             package HTML::WidgetValidator::Widget::PostPet;
2 1     1   5 use base qw(HTML::WidgetValidator::Widget);
  1         2  
  1         76  
3 1     1   5 use warnings;
  1         2  
  1         28  
4 1     1   5 use strict;
  1         2  
  1         33  
5 1     1   5 use Carp;
  1         2  
  1         227  
6            
7             __PACKAGE__->name('PostPet');
8             __PACKAGE__->url('http://www.postpet.so-net.ne.jp/webmail/blog/');
9             __PACKAGE__->models([
10             [ { type => 'start', name => 'script',
11             attr => {
12             language => 'JavaScript',
13             type => 'text/javascript',
14             src => 'http://www.so-net.ne.jp/ad/pp-uranai/postpet.js',
15             }},
16             { type => 'end', name=>'script' } ],
17             [ { type => 'start', name => 'script',
18             attr => {
19             type => 'text/javascript',
20             src => qr{http://www\.postpet\.so-net\.ne\.jp/webmail/blog/clock_v[12]_[a-z]+\.js},
21             }},
22             { type => 'end', name=>'script' } ],
23             [ { type => 'start', name => 'script',
24             attr => {
25             language => 'javascript',
26             type => 'text/javascript',
27             src => qr{http://ppwin\.so\-net\.ne\.jp/webmail/petwindow/script\.do\?window_id=[0-9a-fA-F]+},
28             }},
29             { type => 'end', name=>'script' } ],
30             ]);
31            
32             1;
33             __END__