CHARACTER*(*) ARGUMENT
CALL GETARG(NR_ARGUMENTU,ARGUMENT)
gdzie NR_ARGUMENTU jest numerem kolejnego argumentu linii polecenia a ARGUMENT jest zmienną tekstową, w której będzie zapamiętany dany argument linii polecenia. Liczba arguentów linii polecenia jest dana przez funkcję IARGC().
Przykład:
program prog
character*8 argument(10)
liczba_argumentow=iargc()
do i=1,liczba_argumentow
call getarg(i,argument(i))
enddo
print *,"liczba argumentow",liczba_argumentow
do i=1,liczba_argumentow
print *,"argument ",i,argument(i)
enddo
stop
end
Wywołanie programu prog z argumentami pierwszy, drugi, trzeci wywoła następujący efekt
./prog pierwszy drugi trzeci liczba argumentow 3 argument nr 1 wynosi pierwszy argument nr 2 wynosi drugi argument nr 3 wynosi trzeci