Select Code to Download

$o->check(...);

unless ($o->state) {
...
return if $r->state;

and so on... at the same level