Manual Reference Pages - fileglob (3m_system)

NAME

fileglob(3f) - [M_system:QUERY_FILE] Read output of an ls(1) command from Fortran (LICENSE:PD)

Synopsis
Description
Options
Examples
Author
License

SYNOPSIS

subroutine fileglob(glob,list)

     character(len=*),intent(in)   :: glob
     character(len=*),pointer      :: list(:)

DESCRIPTION

Non-portable procedure uses the shell and the ls(1) command to expand a filename and returns a pointer to a list of expanded filenames.

OPTIONS

glob Pattern for the filenames (like: *.txt)

list Allocated list of filenames (returned), the caller must deallocate it.

EXAMPLES

Read output of an ls(1) command from Fortran

   program demo_fileglob  ! simple unit test
      call tryit(’*.*’)
      call tryit(’/tmp/__notthere.txt’)
   contains

   subroutine tryit(string)
      use M_system, only : fileglob
      character(len=255),pointer :: list(:)
      character(len=*) :: string
      integer :: i
      call fileglob(string, list)
      write(*,*)’Files:’,size(list)
      write(*,’(a)’)(trim(list(i)),i=1,size(list))
      deallocate(list)
   end subroutine tryit

   end program demo_fileglob  ! simple unit test

AUTHOR

John S. Urban

LICENSE

Public Domain

Nemo Release 3.1

fileglob (3m_system)

March 07, 2025

Generated by manServer 1.08 from 4bd9fe31-3d1a-4295-b708-83db573aaaeb using man macros.

glob	Pattern for the filenames (like: *.txt)
list	Allocated list of filenames (returned), the caller must deallocate it.