> SetVar MyPortFoo @NextAvailablePort@

> What do you think?

sounds like a good idea

> +       if ($key eq 'nextavailableport') {
> +           $self->server->select_next_port;
> +       }

rather than hard-coding an exception, maybe use some type of coderef map?

my $non_var_tokens = {
  nextavailableport => $self->server->can('select_next_port'),
};

or somesuch?

but +1 on whatever you come up with - this is goodness :)

--Geoff

Reply via email to