<%args>
    $type  => "text"
    $name  => undef
    $value => undef
    $min   => undef
    $max   => undef
</%args>
% if ($type eq "textarea")
% {
<textarea name="<& '/lib/html/safe.mhtml', 'data' => $name &>" maxlength="<& '/lib/html/safe.mhtml', 'data' => $max &>" rows="5">
<& '/lib/html/safe.mhtml', 'data' => $value &>
</textarea>
% } else {
<input type="<& '/lib/html/safe.mhtml', 'data' => $type &>" name="<& '/lib/html/safe.mhtml', 'data' => $name &>" value="<& '/lib/html/safe.mhtml', 'data' => $value &>" maxlength="<& '/lib/html/safe.mhtml', 'data' => $max &>"/>
% }
