http://qs321.pair.com?node_id=892987


in reply to How to localize conditionally?

Maybe 
{
    local $ENV{BLAH} = 42 if condition();
    libcall();
}

[download]

In Section Seekers of Perl Wisdom