$VAR1 = bless( [
                 bless( [
                          bless( {
                                   'tree' => [
                                               'tag',
                                               'h1',
                                               {
                                                 'a' => 'ololo1'
                                               },
                                               [
                                                 'tag',
                                                 'body',
                                                 {},
                                                 [
                                                   'tag',
                                                   'html',
                                                   {},
                                                   [
                                                     'root',
                                                     [
                                                       'text',
                                                       '<'
                                                     ],
                                                     [
                                                       'text',
                                                       '!DOCTYPE '
                                                     ],
                                                     [
                                                       'doctype',
                                                       ' html PUBLIC "-//W3C//DTD XHTML 1.1//EN"'
                                                     ],
                                                     [
                                                       'text',
                                                       '
'
                                                     ],
                                                     $VAR1->[0][0]{'tree'}[3][3],
                                                     [
                                                       'text',
                                                       '
'
                                                     ]
                                                   ],
                                                   [
                                                     'text',
                                                     '
        '
                                                   ],
                                                   [
                                                     'tag',
                                                     'head',
                                                     {},
                                                     $VAR1->[0][0]{'tree'}[3][3],
                                                     [
                                                       'text',
                                                       '
                '
                                                     ],
                                                     [
                                                       'tag',
                                                       'meta',
                                                       {
                                                         'charset' => 'utf-8'
                                                       },
                                                       $VAR1->[0][0]{'tree'}[3][3][5]
                                                     ],
                                                     [
                                                       'text',
                                                       '                '
                                                     ],
                                                     [
                                                       'tag',
                                                       'title',
                                                       {},
                                                       $VAR1->[0][0]{'tree'}[3][3][5],
                                                       [
                                                         'text',
                                                         'This is a title'
                                                       ]
                                                     ],
                                                     [
                                                       'text',
                                                       '        '
                                                     ]
                                                   ],
                                                   $VAR1->[0][0]{'tree'}[3],
                                                   [
                                                     'text',
                                                     '
'
                                                   ]
                                                 ],
                                                 $VAR1->[0][0]{'tree'},
                                                 [
                                                   'tag',
                                                   'h1',
                                                   {
                                                     'a' => 'ololo2'
                                                   },
                                                   $VAR1->[0][0]{'tree'}[3],
                                                   [
                                                     'text',
                                                     'H_1 _2'
                                                   ]
                                                 ],
                                                 [
                                                   'tag',
                                                   'h1',
                                                   {
                                                     'a' => 'ololo3'
                                                   },
                                                   $VAR1->[0][0]{'tree'}[3],
                                                   [
                                                     'text',
                                                     'H_1 _3'
                                                   ]
                                                 ],
                                                 [
                                                   'tag',
                                                   'h2',
                                                   {},
                                                   $VAR1->[0][0]{'tree'}[3],
                                                   [
                                                     'text',
                                                     'h_2'
                                                   ]
                                                 ],
                                                 [
                                                   'text',
                                                   '
'
                                                 ]
                                               ],
                                               [
                                                 'text',
                                                 'H_1 _1'
                                               ]
                                             ],
                                   'xml' => undef
                                 }, 'Mojo::DOM::HTML' )
                        ], 'Mojo::DOM' ),
                 bless( [
                          bless( {
                                   'tree' => $VAR1->[0][0]{'tree'}[3][5],
                                   'xml' => undef
                                 }, 'Mojo::DOM::HTML' )
                        ], 'Mojo::DOM' ),
                 bless( [
                          bless( {
                                   'tree' => $VAR1->[0][0]{'tree'}[3][6],
                                   'xml' => undef
                                 }, 'Mojo::DOM::HTML' )
                        ], 'Mojo::DOM' )
               ], 'Mojo::Collection' );