Sync

2013-10-27 22:24:23 +00:00 · 2013-10-27 22:24:23 +00:00 · 776bba907c
commit 776bba907c
parent 6f050a029e
3887 changed files with 59894 additions and 7280 deletions
--- a/Task/Environment-variables/COBOL/environment-variables.cobol
+++ b/Task/Environment-variables/COBOL/environment-variables.cobol
@ -0,0 +1,18 @@
+       IDENTIFICATION DIVISION.
+       PROGRAM-ID. Environment-Vars.
+
+       DATA DIVISION.
+       WORKING-STORAGE SECTION.
+       01  home PIC X(75).
+
+       PROCEDURE DIVISION.
+*          *> Method 1.
+           ACCEPT home FROM ENVIRONMENT "HOME"
+           DISPLAY home
+
+*          *> Method 2.
+           DISPLAY "HOME" UPON ENVIRONMENT-NAME
+           ACCEPT home FROM ENVIRONMENT-VALUE
+
+           GOBACK
+           .
--- a/Task/Environment-variables/Erlang/environment-variables.erl
+++ b/Task/Environment-variables/Erlang/environment-variables.erl
@ -0,0 +1 @@
+os:getenv( "HOME" ).