Reading a string with spaces in Fortran

Question

Using read(asterisk, asterisk) in Fortran doesn\'t seem to work if the string to be read from the user contains spaces. Consider the following code:

    characte         


        

Answer 1

  character(100) :: line

  write(*,'("Enter some text: ",\)')
  read(*,'(A)') line
  write(*,'(A)') line

  end

... will read a line of text of maximum length 100 (enough for most practical purposes) and write it out back to you. Modify to your liking.