Hi, Thanks for the reply. I realized that I need libxslt. But unless I am missing something I don't see how to pull the xsl uri out of the xml and feed it to libxslt (XML::LibXSLT). (Maybe I just need to grep for it.) That is my problem. Can you show me some code?
Here is my code:
use lib qw|/home/blm/perl/lib|;
use strict;
use WWW::Mechanize;
use XML::LibXML;
use XML::LibXSLT;
my $mech = WWW::Mechanize->new(agent => 'Mozilla/5.0 (X11; U; Linux i6
+86; en-US;+ rv:1.9.0.1) Gecko/2008070206 Firefox/3.0.1' );
my $url = 'https://some.url.here/';
$mech->delete_header('accept-encoding');
$mech->get($url);
$mech->update_html($mech->content());
print $mech->content;
my $parser = XML::LibXML->new();
my $style_parser = XML::LibXML->new();
my $xslt = XML::LibXSLT->new();
my $doc = $parser->parse_string($mech->content());
print $doc->toString();
my $stylesheet_location = ***Here is my problem***
$mech->get($stylesheet_location);
my $stylesheet_string = $mech->content();
my $styledoc = $style_parser->parse_string($stylesheet_string);
my $stylesheet = $xslt->parse_stylesheet($styledoc);
my $results = $xslt->transform($doc);
print $results;
-
Are you posting in the right place? Check out Where do I post X? to know for sure.
-
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big>
<blockquote> <br /> <dd>
<dl> <dt> <em> <font>
<h1> <h2> <h3> <h4>
<h5> <h6> <hr /> <i>
<li> <nbsp> <ol> <p>
<small> <strike> <strong>
<sub> <sup> <table>
<td> <th> <tr> <tt>
<u> <ul>
-
Snippets of code should be wrapped in
<code> tags not
<pre> tags. In fact, <pre>
tags should generally be avoided. If they must
be used, extreme care should be
taken to ensure that their contents do not
have long lines (<70 chars), in order to prevent
horizontal scrolling (and possible janitor
intervention).
-
Want more info? How to link
or How to display code and escape characters
are good places to start.
|