---

Manual Reference Pages  - system_readenv (3m_system)

---

NAME

system_readenv(3f) - [M_system:ENVIRONMENT] step thru and read environment table (LICENSE:PD)

CONTENTS

Synopsis
Description
Options
Examples
Author
License

SYNOPSIS

function system_readenv() result(string)

     character(len=:),allocatable  :: string

DESCRIPTION

A simple interface allows reading the environment variable table of the process. Call system_initenv(3f) to initialize reading the environment table, then call system_readenv(3f) can be called until a blank line is returned. If more than one thread reads the environment or the environment is changed while being read the results are undefined.

OPTIONS

string	the string returned from the environment of the form "NAME=VALUE"

EXAMPLES

Sample program:

   program demo_system_readenv
   use M_system, only : system_initenv, system_readenv
   character(len=:),allocatable :: string
      call system_initenv()
      do
         string=system_readenv()
         if(string.eq.’’)then
            exit
         else
            write(*,’(a)’)string
         endif
      enddo
   end program demo_system_readenv

Sample results:

   USERDOMAIN_ROAMINGPROFILE=buzz
   HOMEPATH=\Users\JSU
   APPDATA=C:\Users\JSU\AppData\Roaming
   MANPATH=/home/u/LIBRARY/libGPF/download/tmp/man:/home/u/doc/man:::
   DISPLAYNUM=0
   ProgramW6432=C:\Program Files
   HOSTNAME=buzz
   XKEYSYMDB=/usr/share/X11/XKeysymDB
   PUBLISH_CMD=
   OnlineServices=Online Services
        :
        :
        :

AUTHOR

John S. Urban

LICENSE

Public Domain

---

Nemo Release 3.1

system_readenv (3m_system)

March 07, 2025

Generated by manServer 1.08 from c9463d0e-8fa0-4f3f-94da-920b73e268ff using man macros.