view release on metacpan or  search on metacpan

t/XML-Crawler.t  view on Meta::CPAN

                            ],
                            [
                                'style',
                                {
                                    'media' => 'print, screen and (min-width: 481px)',
                                    'type'  => 'text/css'
                                },
                                [ '
/*',
                                    [
                                        '#cdata-section',
                                        '*/
@import url("/2008/site/css/advanced");
/*'
                                    ],
                                    '*/
'
                                ]
                            ],
                            [
                                'link',

t/XML-Crawler.t  view on Meta::CPAN

                                { 'id' => 'w3c_scripts' },
                                [ [
                                        'script',
                                        {
                                            'src'  => '/2008/site/js/main',
                                            'type' => 'text/javascript'
                                        },
                                        [ '
//',
                                            [
                                                '#cdata-section',
                                                '
<!-- -->
//'
                                            ] ] ] ] ] ] ] ] ] ] );

    xml_to_ra_ok( $xml, \@expect, 'ginourmous XML document' );
}


sub xml_to_ra_ok {