blib/lib/HTML/Tested/Value/TextArea.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
statement | 11 | 11 | 100.0 |
branch | n/a | ||
condition | n/a | ||
subroutine | 4 | 4 | 100.0 |
pod | 1 | 1 | 100.0 |
total | 16 | 16 | 100.0 |
line | stmt | bran | cond | sub | pod | time | code |
---|---|---|---|---|---|---|---|
1 | 1 | 1 | 1173 | use strict; | |||
1 | 1 | ||||||
1 | 38 | ||||||
2 | 1 | 1 | 5 | use warnings FATAL => 'all'; | |||
1 | 1 | ||||||
1 | 44 | ||||||
3 | |||||||
4 | package HTML::Tested::Value::TextArea; | ||||||
5 | 1 | 1 | 4 | use base 'HTML::Tested::Value'; | |||
1 | 2 | ||||||
1 | 128 | ||||||
6 | |||||||
7 | sub value_to_string { | ||||||
8 | 1 | 1 | 1 | 3 | my ($self, $name, $val) = @_; | ||
9 | 1 | 7 | return < | ||||
10 | |||||||
11 | ENDS | ||||||
12 | } | ||||||
13 | |||||||
14 | 1; |