Help language development. Donate to The Perl Foundation

JSON::Hjson cpan:AKIYM last updated on 2020-07-09

t/testCases/strings_test.hjson
{
  # simple

  text1:        This is a valid string value.
  text2:a \ is just a \

  text3: "You need quotes\tfor escapes"

  text4: " untrimmed "

  # multiline string

  multiline1:
    '''
    first line
      indented line
    last line
    '''

  multiline2:
    '''first line
      indented line
    last line'''

  multiline3:
    '''
    first line
      indented line
    last line

    ''' # trailing lf

  # escapes/no escape

  foo1a: asdf\"'a\s\w
  foo1b: '''asdf\"'a\s\w'''
  foo1c: "asdf\\\"'a\\s\\w"

  foo2a: "\"asdf\""
  foo2b: '''"asdf"'''

  foo3a: "asdf'''"
  foo3b: "'''asdf"

  foo4a: "asdf'''\nasdf"
  foo4b: "asdf\n'''asdf"

  # in arrays
  arr:
  [
    one
    two
    "three"
    '''four'''
  ]

  # not strings
  not:
  {
    number:      5
    negative:    -4.2
    yes:         true
    no:          false
    null:        null
    array:       [ 1, 2, 3, 4, 5, 6, 7, 8, 9, 0, -1, 0.5 ]
  }

  # special quoted
  special:
  {
    true: "true"
    false: "false"
    null: "null"
    one: "1"
    two: "2"
    minus: "-3"
  }
}