Archive-MoPaQ/lib/Archive/MoPaQ.pm

   1 package Archive::MoPaQ;
   2
   3 use 5.008008;
   4 use strict;
   5 use warnings;
   6
   7 our $VERSION = '0.01';
   8
   9 require XSLoader;
  10 XSLoader::load('Archive::MoPaQ', $VERSION);
  11
  12 sub new {
  13         my $class = shift;
  14         my $self = Archive::MoPaQ->init;
  15         bless $self, $class;
  16 }
  17
  18 1;
  19
  20 __END__
  21
  22 =head1 NAME
  23
  24 Archive::MoPaQ - Interface to libmpq archive library
  25
  26 =head1 SYNOPSIS
  27
  28   use Archive::MoPaQ;
  29   my $mpq = Archive::MoPaQ->new;
  30   $mpq->open("ladder/(4)Lost Temple.scm" or die;
  31   $mpq->extract(1); # write map to file000001.xxx
  32
  33 =head1 DESCRIPTION
  34
  35 Preliminary interface to libmpq, under development.
  36
  37 =head1 SEE ALSO
  38
  39 The I<libmpq> library.
  40
  41 =head1 AUTHOR
  42
  43 Mischa POSLAWSKY <perl@shiar.org>
  44
  45 =head1 COPYRIGHT AND LICENSE
  46
  47 Undefined.
  48
  49 =cut