--- !!perl/hash:TestML::Function
data:
- !!perl/hash:TestML::Block
  label: List
  points:
    lines: 'sail


      away



      List

      NOT


      Lines/Text

      Split(delim)/Join(delim)

      Sort/NumSort/Reverse

      Item(num)/Count


'
- !!perl/hash:TestML::Block
  label: Test One
  points:
    bar: a - b - c
    baz: 'c

      b

      a


'
    foo: 'a

      b

      c

'
- !!perl/hash:TestML::Block
  label: Test Two
  points:
    bar: I - like - pie!
    baz: 'pie!

      like

      I

'
    foo: 'I

      like

      pie!

'
namespace:
  TestML: !!perl/hash:TestML::Str
    value: '1.0'
statements:
- !!perl/hash:TestML::Statement
  expression: !!perl/hash:TestML::Expression
    units:
    - !!perl/hash:TestML::Transform
      args:
      - Title
      - !!perl/hash:TestML::Expression
        units:
        - !!perl/hash:TestML::Str
          value: Test the TestML Standard Library
      name: Set
- !!perl/hash:TestML::Statement
  expression: !!perl/hash:TestML::Expression
    units:
    - !!perl/hash:TestML::Transform
      args:
      - Plan
      - !!perl/hash:TestML::Expression
        units:
        - !!perl/hash:TestML::Num
          value: '12'
      name: Set
- !!perl/hash:TestML::Statement
  expression: !!perl/hash:TestML::Expression
    units:
    - !!perl/hash:TestML::Transform
      args:
      - Label
      - !!perl/hash:TestML::Expression
        units:
        - !!perl/hash:TestML::Str
          value: True.OK
      name: Set
- !!perl/hash:TestML::Statement
  assertion: !!perl/hash:TestML::Assertion
    expression: !!perl/hash:TestML::Expression {}
    name: OK
  expression: !!perl/hash:TestML::Expression
    units:
    - !!perl/hash:TestML::Transform
      name: True
- !!perl/hash:TestML::Statement
  expression: !!perl/hash:TestML::Expression
    units:
    - !!perl/hash:TestML::Transform
      args:
      - Label
      - !!perl/hash:TestML::Expression
        units:
        - !!perl/hash:TestML::Str
          value: False.OK
      name: Set
- !!perl/hash:TestML::Statement
  assertion: !!perl/hash:TestML::Assertion
    expression: !!perl/hash:TestML::Expression {}
    name: OK
  expression: !!perl/hash:TestML::Expression
    units:
    - !!perl/hash:TestML::Transform
      name: False
    - !!perl/hash:TestML::Transform
      name: Not
- !!perl/hash:TestML::Statement
  expression: !!perl/hash:TestML::Expression
    units:
    - !!perl/hash:TestML::Transform
      args:
      - Label
      - !!perl/hash:TestML::Expression
        units:
        - !!perl/hash:TestML::Str
          value: None.OK
      name: Set
- !!perl/hash:TestML::Statement
  assertion: !!perl/hash:TestML::Assertion
    expression: !!perl/hash:TestML::Expression {}
    name: OK
  expression: !!perl/hash:TestML::Expression
    units:
    - !!perl/hash:TestML::Transform
      name: None
    - !!perl/hash:TestML::Transform
      name: Not
- !!perl/hash:TestML::Statement
  expression: !!perl/hash:TestML::Expression
    units:
    - !!perl/hash:TestML::Transform
      args:
      - Label
      - !!perl/hash:TestML::Expression
        units:
        - !!perl/hash:TestML::Str
          value: .Lines.Count -- $BlockLabel
      name: Set
- !!perl/hash:TestML::Statement
  assertion: !!perl/hash:TestML::Assertion
    expression: !!perl/hash:TestML::Expression
      units:
      - !!perl/hash:TestML::Num
        value: '12'
    name: EQ
  expression: !!perl/hash:TestML::Expression
    units:
    - !!perl/hash:TestML::Transform
      args:
      - lines
      name: Point
    - !!perl/hash:TestML::Transform
      name: Lines
    - !!perl/hash:TestML::Transform
      name: Count
  points:
  - lines
- !!perl/hash:TestML::Statement
  expression: !!perl/hash:TestML::Expression
    units:
    - !!perl/hash:TestML::Transform
      args:
      - Label
      - !!perl/hash:TestML::Expression
        units:
        - !!perl/hash:TestML::Str
          value: .Lines.Join -- $BlockLabel
      name: Set
- !!perl/hash:TestML::Statement
  assertion: !!perl/hash:TestML::Assertion
    expression: !!perl/hash:TestML::Expression
      units:
      - !!perl/hash:TestML::Transform
        args:
        - bar
        name: Point
    name: EQ
  expression: !!perl/hash:TestML::Expression
    units:
    - !!perl/hash:TestML::Transform
      args:
      - foo
      name: Point
    - !!perl/hash:TestML::Transform
      name: Lines
    - !!perl/hash:TestML::Transform
      args:
      - !!perl/hash:TestML::Expression
        units:
        - !!perl/hash:TestML::Str
          value: ' - '
      explicit_call: 1
      name: Join
  points:
  - foo
  - bar
- !!perl/hash:TestML::Statement
  expression: !!perl/hash:TestML::Expression
    units:
    - !!perl/hash:TestML::Transform
      args:
      - Label
      - !!perl/hash:TestML::Expression
        units:
        - !!perl/hash:TestML::Str
          value: .Lines.Reverse.Text -- $BlockLabel
      name: Set
- !!perl/hash:TestML::Statement
  assertion: !!perl/hash:TestML::Assertion
    expression: !!perl/hash:TestML::Expression
      units:
      - !!perl/hash:TestML::Transform
        args:
        - baz
        name: Point
    name: EQ
  expression: !!perl/hash:TestML::Expression
    units:
    - !!perl/hash:TestML::Transform
      args:
      - foo
      name: Point
    - !!perl/hash:TestML::Transform
      name: Lines
    - !!perl/hash:TestML::Transform
      name: Reverse
    - !!perl/hash:TestML::Transform
      name: Text
  points:
  - foo
  - baz
- !!perl/hash:TestML::Statement
  expression: !!perl/hash:TestML::Expression
    units:
    - !!perl/hash:TestML::Transform
      args:
      - Label
      - !!perl/hash:TestML::Expression
        units:
        - !!perl/hash:TestML::Str
          value: .Lines.Sort.Text -- $BlockLabel
      name: Set
- !!perl/hash:TestML::Statement
  assertion: !!perl/hash:TestML::Assertion
    expression: !!perl/hash:TestML::Expression
      units:
      - !!perl/hash:TestML::Transform
        args:
        - baz
        name: Point
      - !!perl/hash:TestML::Transform
        name: Lines
      - !!perl/hash:TestML::Transform
        name: Sort
      - !!perl/hash:TestML::Transform
        name: Text
    name: EQ
  expression: !!perl/hash:TestML::Expression
    units:
    - !!perl/hash:TestML::Transform
      args:
      - foo
      name: Point
    - !!perl/hash:TestML::Transform
      name: Lines
    - !!perl/hash:TestML::Transform
      name: Sort
    - !!perl/hash:TestML::Transform
      name: Text
  points:
  - foo
  - baz
- !!perl/hash:TestML::Statement
  expression: !!perl/hash:TestML::Expression
    units:
    - !!perl/hash:TestML::Transform
      args:
      - Label
      - !!perl/hash:TestML::Expression
        units:
        - !!perl/hash:TestML::Str
          value: .Lines.Text -- $BlockLabel
      name: Set
- !!perl/hash:TestML::Statement
  assertion: !!perl/hash:TestML::Assertion
    expression: !!perl/hash:TestML::Expression
      units:
      - !!perl/hash:TestML::Transform
        args:
        - foo
        name: Point
    name: EQ
  expression: !!perl/hash:TestML::Expression
    units:
    - !!perl/hash:TestML::Transform
      args:
      - foo
      name: Point
    - !!perl/hash:TestML::Transform
      name: Lines
    - !!perl/hash:TestML::Transform
      name: Text
  points:
  - foo
  - foo