$mw->after(10, sub { $textvar = $new & 3 });