$VAR1 = bless( {
  'warnings' => [],
  'errors' => [],
  'tree' => bless( {
    'typename' => '(document)',
    'content' => [
      bless( {
        'typename' => 'pod',
        'content' => [
          bless( {
            'typename' => 'code',
            'content' => [
              'sub demo {
    ',
              bless( {
                'typename' => 'B',
                'content' => [
                  'say'
                ],
                'style' => 'formatting'
              }, 'Perl6::Perldoc::FormattingCode::B' ),
              ' \'Hello ',
              bless( {
                'typename' => 'R',
                'content' => [
                  'name'
                ],
                'style' => 'formatting'
              }, 'Perl6::Perldoc::FormattingCode::R' ),
              '\', $I<code>;
}
'
            ],
            'style' => 'delimited'
          }, 'Perl6::Perldoc::Block::code' )
        ],
        'style' => 'implicit'
      }, 'Perl6::Perldoc::Block::pod' )
    ]
  }, 'Perl6::Perldoc::Document' )
}, 'Perl6::Perldoc::Parser::ReturnVal' );