URL: https://www.opennet.me/cgi-bin/openforum/vsluhboard.cgi
Форум: vsluhforumID8
Нить номер: 4388
[ Назад ]

Исходное сообщение
"xsl и XML::LibXSLT"

Отправлено яша , 05-Окт-06 12:43 
привет.
есть такой xml-файл:
<?xml version="1.0" encoding="KOI8-R"?>
<?xml-stylesheet type="text/xsl" href="/www/htdocs/xml/addr.xsl"?>
<books>
    <book>
        <title>...</title>
        <author>Some author</author>
        <ISBN>...</ISBN>
        ...
        <contents>
            <chapter id="1" title="Introduction">
            ...
            </chapter>
        </contents>
        <availability value="1"/>
        <price curr="rub.">940</price>
    </book>
</books>

и есть такой xslt-файл:

<?xml version="1.0" encoding="KOI8-R" ?>
<xsl:stylesheet xmlns:xsl="http://www.w3c.org/1999/XSL/Transform" version="1.0">
    <xsl:output method="html" encoding="KOI8-R" doctype-public="-//W3C//DTD HTML 4.0 Transitional//EN"/>
    <xsl:template match="books">
        <div style="border:1px solid black; background:#eeffee;">
            ...
            <xsl:foreach select="//book">
                <xsl:call-template name="book-head" />
            </xsl:foreach>
        </div>
    </xsl:template>

    <xsl:template name="book-head">
        ...
    </xsl:template>
</xsl:stylesheet>

использую XML::LibXML и XML::LibXSLT (1.6).
Делаю, как в примере с CPAN-а:

use XML::LibXSLT;
use XML::LibXML;

my $parser = XML::LibXML->new();
my $xslt = XML::LibXSLT->new();

my ($stylesheet,$source,$style_doc);
    eval{ $source = $parser->parse_file('/www/htdocs/xml/addr.xml'); };
    if($@){print "Error1: $@"; return;}

    eval {$style_doc = $parser->parse_file('/www/htdocs/xml/addr.xsl'); };
    if($@){print "Error2: $@"; return;}

    eval{ $stylesheet = $xslt->parse_stylesheet($style_doc); };
    if($@){print "Error3: $@"; return;}

    my $results = $stylesheet->transform($source) or die $!;

    print $stylesheet->output_string($results);


и скрипт затыкается на 3м eval с такой ошибкой:
Error3: compilation error: file /www/htdocs/xml/addr.xsl line 2 element stylesheet xsltParseStylesheetProcess : document is not a stylesheet

ничего не могу понять... где грабли? ведь xsl переписывал из книжку и очень много раз перепроверял...
Ругается именно на <xsl:stylesheet ...>, хоть во второй строке он, хоть в десятой... пробовал разные варианты параметров, один фиг тот же результат... В любом случае, почему с параметрами version и xmlns:xsl, взятыми из книжки не работает?


Содержание

Сообщения в этом обсуждении
"xsl и XML::LibXSLT"
Отправлено mrwel , 05-Окт-06 13:45 
Привет!
Убери в XML-файле вторую строку.

"xsl и XML::LibXSLT"
Отправлено яша , 05-Окт-06 14:05 
>Привет!
>Убери в XML-файле вторую строку.

Нет, не помогло.
Парсер XML не ругается, когда парсит xml и xsl файлы.
Ругается парсер XSLT на <xsl:stylesheet ...>

my $xslt = XML::LibXSLT->new();
...
eval {$style_doc = $parser->parse_file('/www/htdocs/xml/addr.xsl'); };
if($@){print "Error2: $@"; return;}

eval{ $stylesheet = $xslt->parse_stylesheet($style_doc); };
if($@){print "Error3: $@"; return;}
              ^^^^^^ вот здесь ругается.
То же самое будет, если парсить xsl не с помощью $parser->parse_file, а с помощью $xslt->parse_stylesheet_file("/www/htdocs/addr.xsl")...


"xsl и XML::LibXSLT"
Отправлено яша , 06-Окт-06 13:22 
решил проблему:
><xsl:stylesheet xmlns:xsl="http://www.w3c.org/1999/XSL/Transform" version="1.0">
правильно
<xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" version="1.0">
w3.org а не w3c.org