Help for this page

Select Code to Download

Select or download this

   s/([^=]+)/(my $lhs=$1) =~ tr:_:.:; $lhs/e for @envArray;

Select or download this

   s/([^=]+)/(my $lhs=$1) =~ tr:_:.:; $lhs/e for @array=@envArray;