use strict; use warnings FATAL => 'all'; package HTML::Tested::Value::EditBox; use base 'HTML::Tested::Value'; sub value_to_string { my ($self, $name, $val) = @_; return < ENDS } 1;