getarg(3F)

Name

Synopsis

subroutine getarg ( k, arg )
character*(*) arg
function iargc ()

Description

语句 call getarg( k , arg ) 获取第 k 个命令行参数并将其放置到 arg 中。

第 0 个参数是命令名称。

函数 iargc 返回参数计数，也就是最后一个命令行参数的索引。

示例

 
demo% cat tesargs.f
     character argv*10
     integer i, iargc, m
     m = iargc()
     do i = 1, m
          call getarg ( i, argv )
          write( *, '( i2, 1x, a )' ) i, argv
     end do
     end
demo % a.out first second last
 1 first
 2 second
 3 last
demo%
     
      

Files

libfui.a

See also

execve(2)、getenv(3F)