Foro - Perl en Español

Necesito como hacer para poner disabled un widget Text. ¡Ah!, y como poner cuando meta datos en el text como transformarlo en mayúscula, es decir, cuando teclee juan jose que aparezca JUAN JOSE.

Gracias...

Lo de pasar a mayúsculas lo puedes hacer con la función uc().
http://perldoc.perl.org/functions/uc.html

QUe API usas?