perl-test-dev mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From Geoffrey Young <ge...@modperlcookbook.org>
Subject Re: [PATCH] @NextAvailablePort@ token in conf.in
Date Wed, 26 Oct 2005 22:45:27 GMT

> 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

Mime
View raw message