static char help[] = "I hate C strings.\n\n";

#include "petsc.h"

#undef __FUNCT__
#define __FUNCT__ "main"
int main(int argc,char **argv)
{
  PetscErrorCode     ierr;
  PetscBool          flg;
  char               buffer[PETSC_MAX_PATH_LEN];
  char               filename[PETSC_MAX_PATH_LEN];
  
  PetscFunctionBegin;
  ierr = PetscInitialize(&argc,&argv,(char*)0,help);CHKERRQ(ierr);

  ierr = PetscOptionsInsertFile_YAML(PETSC_COMM_WORLD,"options.yml",PETSC_TRUE);CHKERRQ(ierr);
  /*
    ASCII options work fine
  */
  /*
  ierr = PetscOptionsInsertFile(PETSC_COMM_WORLD,"options.txt",PETSC_TRUE);CHKERRQ(ierr);
  */
  ierr   = PetscOptionsGetString("","-p",buffer,PETSC_MAX_PATH_LEN-1,&flg);CHKERRQ(ierr);
  if (flg) {
    ierr = PetscPrintf(PETSC_COMM_WORLD,"buffer is [%s]\n",buffer);CHKERRQ(ierr);
  } else {
    ierr = PetscPrintf(PETSC_COMM_WORLD,"Could not fine option -p\n");CHKERRQ(ierr);
  }
  PetscFinalize();
  PetscFunctionReturn(0);
}