eval {$window->title('foo')}; if ($@) {....} else {eval {$window->border(20)} if ($@) {....}}