John wrote:
How can activate the caps lock while the user write in a perl programt (Perl/Tk)
Why would you want to do that?!?
John, if you want to do that because you need to have your input all in caps, then use uc:
$text = uc $text;
You will need to add:
use locale;
at the beginning of your program if your character set is not US-ASCII. You can update the text field with uppercase letters after user finishes typing, if you want it to be visible.
-- ZSDC
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
