NAME
Data::HTML::Textarea - Data object for HTML textarea.
SYNOPSIS
use Data::HTML::Textarea;
my $obj = Data::HTML::Textarea->new(%params);
my $autofocus = $obj->autofocus;
my $cols = $obj->cols;
my $css_class = $obj->css_class;
my $disabled = $obj->disabled;
my $form = $obj->form;
my $id = $obj->id;
my $label = $obj->label;
my $name = $obj->name;
my $placeholder = $obj->placeholder;
my $readonly = $obj->readonly;
my $required = $obj->required;
my $rows = $obj->rows;
my $value = $obj->value;
METHODS
"new"
my $obj = Data::HTML::Textarea->new(%params);
Constructor.
* "autofocus"
Textarea autofocus flag.
Default value is 0.
* "cols"
Textarea columns number.
Default value is undef.
* "css_class"
Textarea CSS class.
Default value is undef.
* "disabled"
Textarea disabled flag.
Default value is 0.
* "form"
Textarea form id.
Default value is undef.
* "id"
Form identifier.
Default value is undef.
* "label"
Form label.
Default value is undef.
* "name"
Form name.
Default value is undef.
* "placeholder"
Form placeholder.
Default value is undef.
* "readonly"
Textarea readonly flag.
Default value is 0.
* "required"
Textarea required flag.
Default value is 0.
* "rows"
Textarea rows number.
Default value is undef.
* "value"
Textarea value.
Default value is undef.
Returns instance of object.
"autofocus"
my $autofocus = $obj->autofocus;
Get autofocus boolean flag for textarea.
Returns 0/1.
"cols"
my $cols = $obj->cols;
Get textarea column number.
Returns number.
"css_class"
my $css_class = $obj->css_class;
Get CSS class for textarea.
Returns string.
"disabled"
my $disabled = $obj->disabled;
Get disabled boolean flag for textarea.
Returns 0/1.
"form"
my $form = $obj->form;
Get form id for textarea.
Returns string.
"id"
my $id = $obj->id;
Get textarea identifier.
Returns string.
"label"
my $label = $obj->label;
Get textarea label.
Returns string.
"name"
my $name = $obj->name;
Get textarea name.
Returns string.
"placeholder"
my $placeholder = $obj->placeholder;
Get textarea placeholder.
Returns string.
"readonly"
my $readonly = $obj->readonly;
Get readonly boolean flag for textarea.
Returns 0/1.
"required"
my $required = $obj->required;
Get required boolean flag for textarea.
Returns 0/1.
"rows"
my $rows = $obj->rows;
Get textarea rows number.
Returns number.
"value"
my $value = $obj->value;
Get textarea value.
Returns string.
ERRORS
new():
Parameter 'autofocus' must be a bool (0/1).
Value: %s
Parameter 'cols' must be a number.
Value: %s
Parameter 'disabled' must be a bool (0/1).
Value: %s
Parameter 'readonly' must be a bool (0/1).
Value: %s
Parameter 'required' must be a bool (0/1).
Value: %s
Parameter 'rows' must be a number.
Value: %s
EXAMPLE
use strict;
use warnings;
use Data::HTML::Textarea;
my $obj = Data::HTML::Textarea->new(
'autofocus' => 1,
'css_class' => 'textarea',
'id' => 'textarea-id',
'label' => 'Textarea label',
'value' => 'Textarea value',
);
# Print out.
print 'Autofocus: '.$obj->autofocus."\n";
print 'CSS class: '.$obj->css_class."\n";
print 'Disabled: '.$obj->disabled."\n";
print 'Id: '.$obj->id."\n";
print 'Label: '.$obj->label."\n";
print 'Readonly: '.$obj->readonly."\n";
print 'Required: '.$obj->required."\n";
print 'Value: '.$obj->value."\n";
# Output:
# Autofocus: 1
# CSS class: textarea
# Disabled: 0
# Id: textarea-id
# Label: Textarea label
# Readonly: 0
# Required: 0
# Value: Textarea value
DEPENDENCIES
Mo, Mo::utils.
REPOSITORY
AUTHOR
Michal Josef Špaček
LICENSE AND COPYRIGHT
© 2022-2023 Michal Josef Špaček
BSD 2-Clause License
VERSION
0.01