Select Code to Download

sub toggle_door
  {
...
    }
    return $$door_ref; 
  }

sub toggle_door {

...
  return $$door_ref = $transition->{$$door_ref};

  }

sub toggle_door {

...
  return $_[0] = $transition->{$_[0]};

  }