Select Code to Download

    page p1 {
        question 4B {
...
            }
        }
    }

1. Block Type -- (word) (optional:word) { (nested patterns) }
2. String Type -- (string)

my $nestedhash = {
    type => page,
...
          <-or, one or more simple scalars (for the strings)->
    ],
};