← Back to branch summary

~ubuntu-branches/ubuntu/precise/libxml-bare-perl/precise

« back to all changes in this revision

Viewing changes to bench/notree.tmpl

  • Committer: Bazaar Package Importer
  • Author(s): Antonio Radici, Antonio Radici, gregor herrmann
  • Date: 2009-03-22 10:49:56 UTC
  • mfrom: (1.1.1 upstream)
  • Revision ID: james.westby@ubuntu.com-20090322104956-a5hx63ijvvmy4ao6
Tags: 0.43-1
[ Antonio Radici ]
* New upstream release
* debian/copyright:
  + added copyright for src/bench/xmlio_testread.cpp
  + removed repack.sh references because there are no licensing issues
  + set the proper license for the upstream source (it is dual licensed)
* debian/control:
  + upgrade to Standards-Version 3.8.1, no changes required
* removed debian/repack.sh
* debian/watch:
  + removed versionmangle and the reference to repack

[ gregor herrmann ]
* debian/control: add missing full stop to long description, thanks to
  Rhonda for spotting.

Show diffs side-by-side

added added

removed removed

Lines of Context:
bench/notree.tmpl
 
1
#c
 
2
Parsing without native Perl trees
 
3
 
 
4
#0
 
5
require XML::Bare;
 
6
my $ob = new XML::Bare( file => $file );
 
7
 
 
8
#-
 
9
require XML::LibXML;
 
10
my $parser = XML::LibXML->new();
 
11
my $doc = $parser->parse_file( $file );
 
12
 
 
13
#-
 
14
require XML::Parser;
 
15
my $parser = new XML::Parser();
 
16
my $doc = $parser->parsefile( $file );
 
17
 
 
18
#-
 
19
require XML::Parser::Expat;
 
20
my $parser = new XML::Parser::Expat();
 
21
sub noop{}
 
22
$parser->setHandlers('Start' => \&noop, 'End' => \&noop, 'Char' => \&noop);
 
23
open(FOO, $file) or die "Couldn't open $!";
 
24
$parser->parse(*FOO);
 
25
close(FOO);
 
26
 
 
27
#-
 
28
require XML::Descent;
 
29
my $p = XML::Descent->new( { Input => $file } );
 
30
$p->on( item => sub {
 
31
                  my ($elem, $attr) = @_;
 
32
                  $p->walk; # recurse
 
33
                }                               );
 
34
$p->walk;
 
35
 
 
36
#-
 
37
require XML::DOM;
 
38
my $parser = new XML::DOM::Parser;
 
39
my $doc = $parser->parsefile( $file );
 
 
b'\\ No newline at end of file'