|
Lines 310-318
sub _transformWithStylesheet {
Link Here
|
| 310 |
my $xslt = XML::LibXSLT->new(); |
310 |
my $xslt = XML::LibXSLT->new(); |
| 311 |
my $source = $parser->parse_string($xmlrecord); |
311 |
my $source = $parser->parse_string($xmlrecord); |
| 312 |
my $style_doc = $parser->parse_file($xslfile); |
312 |
my $style_doc = $parser->parse_file($xslfile); |
| 313 |
my $stylesheet = $xslt->parse_stylesheet($style_doc); |
313 |
my $style_sheet = $xslt->parse_stylesheet($style_doc); |
| 314 |
my $results = $stylesheet->transform($source); |
314 |
my $results = $style_sheet->transform($source); |
| 315 |
my $newxmlrecord = $stylesheet->output_string($results); |
315 |
my $newxmlrecord = $style_sheet->output_string($results); |
| 316 |
return ($newxmlrecord); |
316 |
return ($newxmlrecord); |
| 317 |
} |
317 |
} |
| 318 |
|
318 |
|
| 319 |
- |
|
|