program main
  !use WebServer, only: get_progress
  use FileReader, only: read_file
  use Greeter, only: say_hello

  implicit none

  character, allocatable :: Data

  call say_hello()
  !call get_progress()
  call read_file("/home/skingging/Documents/Projects/Fortran/Web-Server-In-Fortran/html/index.html", Data)
end program main