lib/Tools/getenv
changeset 47674 cdf95042e09c
parent 31497 5333aa739082
child 61294 2d3d26e9b191
equal deleted inserted replaced
47673:dd253cfa5b23 47674:cdf95042e09c
    74     fi
    74     fi
    75   done
    75   done
    76 fi
    76 fi
    77 
    77 
    78 if [ -n "$DUMP" ]; then
    78 if [ -n "$DUMP" ]; then
       
    79   export PATH_JVM="$(jvmpath "$PATH")"
    79   exec perl -w -e 'for $key (keys %ENV) { print $key, "=", $ENV{$key}, "\x00"; }' > "$DUMP"
    80   exec perl -w -e 'for $key (keys %ENV) { print $key, "=", $ENV{$key}, "\x00"; }' > "$DUMP"
    80 fi
    81 fi
    81 
    82