{
    local %ENV = map { $_ => "$ENV{$_}" } qw{
        ALLUSERSPROFILE
        APPDATA
        COMMONPROGRAMFILES
        COMPUTERNAME
        COMSPEC
        FB_FILE
        HOMEDRIVE
        HOMEPATH
        LOGONSERVER
        OS
        PATH
        PATHEXT
        PROGRAMFILES
        PROMPT
        SESSIONNAME
        SYSTEMDRIVE
        SYSTEMROOT
        TEMP
        USERDOMAIN
        USERNAME
        USERPROFILE
        WINDIR
    };
    print qx{ dir };
}