Next: , Previous: GETCWD, Up: Intrinsic Procedures


8.91 GETENV — Get an environmental variable

Description:
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 intrinsic defined by the Fortran 2003 standard.

Standard:
GNU extension
Class:
Subroutine
Syntax:
CALL GETENV(NAME, VALUE)
Arguments:

NAME Shall be of type CHARACTER and of default kind.
VALUE Shall be of type CHARACTER and of default kind.

Return value:
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.
Example:
          PROGRAM test_getenv
            CHARACTER(len=255) :: homedir
            CALL getenv("HOME", homedir)
            WRITE (*,*) TRIM(homedir)
          END PROGRAM
     

See also:
GET_ENVIRONMENT_VARIABLE