Help for this page
if( do{$o->check(...); ! $o->state} ){ action.. ... } } }
$o->check(...); unless ($o->state) { ... $o->actionSet1; } }
unless ( $o->check(...) ) { action.. ... } } }