view release on metacpan or  search on metacpan

README  view on Meta::CPAN

      my $parser = Python::Bytecode::SAX->new( Handler => $handler, SAX => 2 );
      $parser->parse_file('foo.pyc');

    Or

      use Python::Bytecode::SAX;
      use XML::Handler::YAWriter;
      my $handler = XML::Handler::YAWriter->new(
          AsFile => 'foo.xml',
          Pretty  => {
              CompactAttrIndent  => 1,
              PrettyWhiteIndent  => 1,
              PrettyWhiteNewline => 1,
              CatchEmptyElement  => 1
          }
      );
      my $parser = Python::Bytecode::SAX->new( Handler => $handler, SAX => 1 );
      $parser->parse_file('foo.pyc');

DESCRIPTION
    This module reads and decodes a Python bytecode file, generating SAX1 or

lib/Python/Bytecode/SAX.pm  view on Meta::CPAN

  my $parser = Python::Bytecode::SAX->new( Handler => $handler, SAX => 2 );
  $parser->parse_file('foo.pyc');

Or

  use Python::Bytecode::SAX;
  use XML::Handler::YAWriter;
  my $handler = XML::Handler::YAWriter->new(
      AsFile => 'foo.xml',
      Pretty  => {
          CompactAttrIndent  => 1,
          PrettyWhiteIndent  => 1,
          PrettyWhiteNewline => 1,
          CatchEmptyElement  => 1
      }
  );
  my $parser = Python::Bytecode::SAX->new( Handler => $handler, SAX => 1 );
  $parser->parse_file('foo.pyc');

=head1 DESCRIPTION

t/yawriter.t  view on Meta::CPAN

eval "use XML::Handler::YAWriter";

if ($@) {
    print "ok 1 # Skip no XML::Handler::YAWriter\n";
}
else {
    my $handler = XML::Handler::YAWriter->new(
        AsFile => 't/primes2-yawriter.xml',
        Pretty  => {
            CompactAttrIndent  => 1,
            PrettyWhiteIndent  => 1,
            PrettyWhiteNewline => 1,
            CatchEmptyElement  => 1
        }
    );

    my $parser = Python::Bytecode::SAX->new(
        SAX     => 1,
        Handler => $handler
    );