GETENV
— Get an environmental variable ¶Get the VALUE of the environmental variable NAME.
This intrinsic routine is provided for backwards compatibility with
GNU Fortran 77. In new code, programmers should consider the use of
the GET_ENVIRONMENT_VARIABLE
— Get an environmental 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.
GNU extension
Subroutine
CALL GETENV(NAME, VALUE)
NAME | Shall be of type CHARACTER and of default kind. |
VALUE | Shall be of type CHARACTER and of default kind. |
Stores the value of NAME in VALUE. If VALUE is not large enough to hold the data, it is truncated. If NAME is not set, VALUE will be filled with blanks.
PROGRAM test_getenv CHARACTER(len=255) :: homedir CALL getenv("HOME", homedir) WRITE (*,*) TRIM(homedir) END PROGRAM