$mw->after( 2000, ('configure', ($tree, -background => 'green') ) );