blib/lib/Tags/HTML/Form.pm | |||
---|---|---|---|
Criterion | Covered | Total | % |
condition | 11 | 24 | 45.8 |
line | !l | l&&!r | l&&r | condition |
---|---|---|---|---|
54 | 1 | 0 | 16 | &blessed($self->{'form'}) and $self->{'form'}->isa("Data::HTML::Form") |
67 | 1 | 1 | 12 | &blessed($self->{'submit'}) and $self->{'submit'}->isa('Data::HTML::Form::Input') || $self->{'submit'}->isa('Data::HTML::Button') |
111 | 0 | 1 | 1 | defined $field and &blessed($field) |
1 | 1 | 0 | defined $field and &blessed($field) and $field->isa('Data::HTML::Form::Input') || $field->isa('Data::HTML::Textarea') || $field->isa('Data::HTML::Form::Select') |
line | l | !l&&r | !l&&!r | condition |
---|---|---|---|---|
67 | 2 | 11 | 0 | $self->{'submit'}->isa('Data::HTML::Form::Input') || $self->{'submit'}->isa('Data::HTML::Button') |
84 | 0 | 0 | 0 | not &blessed($self->{'input'}) or $self->{'input'}->isa("Tags::HTML::Form::Input") |
96 | 0 | 0 | 0 | not &blessed($self->{'select'}) or $self->{'select'}->isa("Tags::HTML::Form::Select") |
111 | 0 | 0 | 0 | $field->isa('Data::HTML::Form::Input') || $field->isa('Data::HTML::Textarea') || $field->isa('Data::HTML::Form::Select') |