From Code to Community: Sponsoring The Perl and Raku Conference 2025 Learn more

use strict;
use Test::More tests => 3;
my $class = 'HTML::FormHandler::Field::TextArea';
use_ok( $class );
my $field = $class->new( name => 'comments', cols => 40, rows => 3 );
ok( $field, 'get TextArea field');
$field->input("Testing, testing, testing... This is a test");
$field->process;
ok( !$field->has_errors, 'field has no errors');