blib/lib/WebService/ChatWork/Message/Tag/Hr.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
statement | 14 | 14 | 100.0 |
branch | n/a | ||
condition | n/a | ||
subroutine | 6 | 6 | 100.0 |
pod | 1 | 2 | 50.0 |
total | 21 | 22 | 95.4 |
line | stmt | bran | cond | sub | pod | time | code |
---|---|---|---|---|---|---|---|
1 | 1 | 1 | 677 | use strict; | |||
1 | 1 | ||||||
1 | 29 | ||||||
2 | 1 | 1 | 4 | use warnings; | |||
1 | 1 | ||||||
1 | 46 | ||||||
3 | package WebService::ChatWork::Message::Tag::Hr; | ||||||
4 | 1 | 1 | 4 | use overload q{""} => \&as_string; | |||
1 | 1 | ||||||
1 | 8 | ||||||
5 | 1 | 1 | 46 | use Mouse; | |||
1 | 2 | ||||||
1 | 7 | ||||||
6 | |||||||
7 | extends "WebService::ChatWork::Message::Tag"; | ||||||
8 | |||||||
9 | 1 | 1 | 1 | 4 | sub new { bless { }, shift } | ||
10 | |||||||
11 | 1 | 1 | 0 | 42 | sub as_string { "[hr]" } | ||
12 | |||||||
13 | 1; |