您可以使用不同的bash_profile调用另一个Bash。 此外，您还可以创建特殊的bash_profile用于多bashprofile环境。

请记住，您可以在bashprofile中使用函数，并且该函数将全局可用。 例如，“function user {export USER_NAME $1}”可以在运行时设置变量，例如:user olegchir && env | grep olegchir

在我的.bash_profile我有:

# No Proxy
function noproxy
{
    /usr/local/sbin/noproxy  #turn off proxy server
    unset http_proxy HTTP_PROXY https_proxy HTTPs_PROXY
}


# Proxy
function setproxy
{
    sh /usr/local/sbin/proxyon  #turn on proxy server 
    http_proxy=http://127.0.0.1:8118/
    HTTP_PROXY=$http_proxy
    https_proxy=$http_proxy
    HTTPS_PROXY=$https_proxy
    export http_proxy https_proxy HTTP_PROXY HTTPS_PROXY
}

当我想禁用代理时， 函数在登录shell中运行并设置变量 正如预期和希望的那样。

使用“点空格脚本”调用语法。例如，下面是如何使用脚本的完整路径:

. /path/to/set_env_vars.sh

如果你和脚本在同一个目录中，下面是如何做到这一点:

. set_env_vars.sh

它们在当前shell下执行脚本，而不是加载另一个脚本(如果您执行./set_env_vars.sh，就会发生这种情况)。因为它在同一个shell中运行，所以当它退出时，您设置的环境变量将可用。

这与调用源set_env_vars.sh是一样的事情，但它的输入更短，并且可能在源不能工作的某些地方工作。

这是有效的-这不是我要用的，但它“有效”。让我们创建一个脚本teredo来设置环境变量TEREDO_WORMS:

#!/bin/ksh
export TEREDO_WORMS=ukelele
exec $SHELL -i

它将由Korn shell解释，导出环境变量，然后用一个新的交互式shell替换自身。

在运行这个脚本之前，我们将环境中的SHELL设置为C SHELL，并且没有设置环境变量TEREDO_WORMS:

% env | grep SHELL
SHELL=/bin/csh
% env | grep TEREDO
%

当脚本运行时，你在一个新的shell中，另一个交互式C shell，但环境变量是设置的:

% teredo
% env | grep TEREDO
TEREDO_WORMS=ukelele
%

当你退出这个外壳时，原来的外壳接管:

% exit
% env | grep TEREDO
%

在原始shell的环境中没有设置环境变量。如果您使用exec teredo来运行该命令，那么原来的交互式shell将被设置环境的Korn shell所取代，然后依次被一个新的交互式C shell所取代:

% exec teredo
% env | grep TEREDO
TEREDO_WORMS=ukelele
%

如果您键入exit(或Control-D)，那么您的shell将退出，可能会让您退出该窗口，或者将您带回到实验开始的前一层shell。

同样的机制也适用于Bash或Korn shell。您可能会发现退出命令之后的提示符出现在有趣的地方。

请注意评论中的讨论。这不是我推荐的解决方案，但它确实实现了单一脚本的目的，即设置与所有shell(接受-i选项以生成交互式shell)一起工作的环境。您还可以在选项后面添加“$@”以中继任何其他参数，这可能会使shell可用作通用的“设置环境和执行命令”工具。如果有其他参数，你可能想要省略-i，导致:

#!/bin/ksh
export TEREDO_WORMS=ukelele
exec $SHELL "${@-'-i'}"

“${@-'-i'}”位表示“如果参数列表包含至少一个参数，则使用原始参数列表;否则，用-i代替不存在的参数'。

您可以指示子进程打印它的环境变量(通过调用“env”)，然后在父进程中循环打印的环境变量，并对这些变量调用“export”。

下面的代码基于find的捕获输出。-print0转换为bash数组

如果父shell是bash，则可以使用

while IFS= read -r -d $'\0' line; do
    export "$line"
done < <(bash -s <<< 'export VARNAME=something; env -0')
echo $VARNAME

如果父shell是破折号，则read不提供-d标志，代码将变得更加复杂

TMPDIR=$(mktemp -d)
mkfifo $TMPDIR/fifo
(bash -s << "EOF"
    export VARNAME=something
    while IFS= read -r -d $'\0' line; do
        echo $(printf '%q' "$line")
    done < <(env -0)
EOF
) > $TMPDIR/fifo &
while read -r line; do export "$(eval echo $line)"; done < $TMPDIR/fifo
rm -r $TMPDIR
echo $VARNAME

除了根据$SHELL/$TERM设置的写入条件外，没有。使用Perl有什么问题?它非常普遍(我想不出有哪个UNIX变体没有它)，而且它将为您省去这些麻烦。