GETENV — Get an environmental variableThis intrinsic routine is provided for backwards compatibility with GNU Fortran 77. In new code, programmers should consider the use of the GET_ENVIRONMENT_VARIABLE intrinsic defined by the Fortran 2003 standard.
Note that GETENV need not be thread-safe. It is the
responsibility of the user to ensure that the environment is not being
updated concurrently with a call to the GETENV intrinsic.
     
CALL GETENV(NAME, VALUE)
     | NAME | Shall be of type CHARACTERand of default kind. | 
| VALUE | Shall be of type CHARACTERand of default kind. | 
          PROGRAM test_getenv
            CHARACTER(len=255) :: homedir
            CALL getenv("HOME", homedir)
            WRITE (*,*) TRIM(homedir)
          END PROGRAM