$env->SetValue('PERL_PATHS', $new_dirs) $path = "$path;$new_dirs; $env->SetValue('Path', $path);