If you want the same behaviour, you can call

$mw->bind('<Key-Down>' => 
          sub { $test_but->invoke } );
[download]

instead.