for (@Fields) {
    print
        $_->{Title},
        ': ',
        textfield(
            -name => $_->{Name},
            -value => $_->{Value},
        );
}

##</code><code>##

for (@Fields) {
    param(
        -name => $_->{Field}	,
        -value => $_->{Info},
    );
    print
        $_->{Title},
        ': ',
        textfield(
            -name => $_->{Name},
            -value => $_->{Value},
        );
}