My question is simple.

May I ask you to spend some effort to actually write down your question?

In your code, sub three and sub four do exactly the same thing, but you seem to expect them to behave differently. If sub four does $Button1->configure(-state => "normal");, then button 1 will be enabled, period. Maybe you want to query the state of your sensor in sub four? Only, I don't see any sensor in your code.