%sample    = 
(
'login' =>["Login", 75, 'textfield', 'login'],
'last' =>["Last Name", 75, 'textfield', 'last'],
'first' =>["First Name", 70, 'textfield', 'first']
);

##</code><code>##

%sample=
(
'login' =>{name=>"Login", width=>75, method=> 'textfield', field=>'login'},
'last' =>{name=>"Last Name", width=> 75, method=>'textfield', field=>'last'],
'first' =>{name=>"First Name", width=>70, method=>'textfield', field=>'first'}
);

##</code><code>##

print $q->$sample{'last'}{'method'} ($sample{'last'}{'field'});