4 getEnvVar "TERM" >>= \ term ->
7 setEnvironment [("one","1"),("two","2")] >>
8 getEnvironment >>= \ env ->
11 setEnvVar "foo" "bar" >>
12 getEnvironment >>= \ env ->
15 setEnvVar "foo" "baz" >>
16 getEnvironment >>= \ env ->
19 setEnvVar "fu" "bar" >>
20 getEnvironment >>= \ env ->
24 getEnvironment >>= \ env ->
28 getEnvironment >>= \ env ->