stupid perl question

david.birdsong · 2015-12-30T07:37:11+00:00

On Tue, Dec 29, 2015 at 2:46 PM, Yichun Zhang (agentzh) <age...@gmail.com> wrote:Hello! On Tue, Dec 29, 2015 at 2:42 PM, David Birdsong wrote: >...

stupid perl question

david.birdsong

I can't figure out why setting TEST_NGINX_BINARY in my test doesn't propagate down to

Test::Nginx::Util while exporting the variable in Bash affects the env properly.

Perl snippet:

$ENV{'TEST_NGINX_BINARY'} = 'hwyman-ngx';
use Test::Nginx::Socket;

in Test:Nginx:Util
our $NginxBinary = $ENV{TEST_NGINX_BINARY} || 'nginx'

evaluates to 'nginx'. Is there a trick to writing to the env properly for all packages? I can't find any perl docs that suggest anything else is needed, and yet changes to $ENV don't appear to cross package boundaries.

agentzh

Hello!

On Tue, Dec 29, 2015 at 3:36 PM, David Birdsong wrote:
> I can't figure out why setting TEST_NGINX_BINARY in my test doesn't
> propagate down to
> Test::Nginx::Util while exporting the variable in Bash affects the env
> properly.
>

You need to use the BEGIN {} block of Perl to set such environments
before the "use" statements you want to affect. See the
t/057-flush-timeout.t test file in lua-nginx-module for such an
example.

Regards,
-agentzh