@a = ('textfield',qq|-name=>'lastname'|, qq|-default=>'Bob'|, etc.);
$q->$a[0]($a[1],$a[2],$a[3], etc...)