[perl-win32-gui] change event

[fvittori]

Hello all,

I have a textfield on my window.   I am trying to use the Change event to
capture the character that is being entered.     Here's the snippet:

sub txtStatus_Change {
     print "$_";
}

When I enter a character in the textfield, nothing is being displayed in the DOS
window.     What am I doing wrong?    What I want to do, eventually, is that
when a user enters a character I want to automatically change that letter to
uppercase.

Thanks In Advance,
Felice