Path: usenet.cise.ufl.edu!newsfeeds.nerdc.ufl.edu!news.msfc.nasa.gov!europa.netcrusader.net!192.148.253.68!netnews.com!newspeer1.nac.net!nntp1.savvis.net!nntp2.savvis.net!inetarena.com!not-for-mail
From: User um mit Netscape News zu lesen <[email protected]>
Newsgroups: comp.lang.perl.announce,comp.lang.perl.modules
Subject: ANNOUNCE: MPEG::MP3Play 0.06
Followup-To: comp.lang.perl.modules
Date: 8 Sep 1999 16:44:32 GMT
Organization: Internet Arena
Lines: 164
Approved: [email protected] (comp.lang.perl.announce)
Message-ID: <[email protected]>
Reply-To: [email protected]
NNTP-Posting-Host: halfdome.holdit.com
X-Disclaimer: The "Approved" header verifies header information for article transmission and does not imply approval of content.
Xref: usenet.cise.ufl.edu comp.lang.perl.announce:356 comp.lang.perl.modules:13317


I just uploaded MPEG::MP3Play 0.06 to CPAN.


http://www.perl.com/CPAN/modules/by-authors/id/J/JR/JRED/MPEG::MP3Play-0.06.tar.gz

Version 0.06 is a bugfix release eliminating a memory leak problem. You
should upgrade from earlier versions. There are no changes to the
interface.


NAME
   MPEG::MP3Play - Perl extension for playing back MPEG music

SYNOPSIS
     use MPEG::MP3Play;
     my $mp3 = new MPEG::MP3Play;

     $mp3->open ("test.mp3");
     $mp3->play;
     $mp3->message_handler;

DESCRIPTION
   This Perl module enables you to playback MPEG music.

PREREQUISITES
   Xaudio SDK

   MPEG::MP3Play is build against the 3.0 version of the Xaudio SDK
   and uses the async interface of the Xaudio library.

   I don't know if older versions will work properly. The SDK is
   not part of this distribution, so get and install it first
   (http://www.xaudio.com/).

   Perl

   I built and tested this module using Perl 5.005_03. It should
   work also with Perl 5.004_04 and above, but I did not test this.
   If someone builds MPEG::MP3Play successfully with other versions
   of Perl, plesase drop me a note.

   Optionally used Perl modules

     samples/play.pl uses Term::ReadKey if it's installed.
     samples/handler.pl requires Term::ReadKey.
     samples/gtk*.pl require Gtk.

INSTALLATION
   First, generate the Makefile:

     perl Makefile.PL

   You will be prompted for the location of the Xaudio SDK. The
   directory must contain the include and lib subdirectories, where
   the Xaudio header and library files are installed.

     make
     make test
     ./runsample play.pl
     ./runsample handler.pl
     ./runsample gtk.pl
     ./runsample gtkhandler.pl
     make install

SAMPLE SCRIPTS
   There are some small test scripts in the samples directory. You
   can run these scripts before 'make install' with the runsample
   script (or directly with 'perl', after running 'make install').
   For runsample usage: see above.

   All scripts expect a mp3 file 'test.mp3' in the actual
   directory.

   play.pl Textmodus playback. Displays the timecode. Simple volume
           control with '+' and '-' keys.

   handler.pl
           Does generally the same as play.pl, but uses the builtin
           message handler. You'll see, that this solution is much
           more elegant. It *requires* Term::ReadKey.

           This script makes use of the debugging facility and is
           best documented so far.

   gtk.pl  This script demonstrates the usage of MPEG::MP3Play with the
           Gtk module. It produces a simple window with a progress
           bar while playing back the test.mp3 file.

   gtkhandler.pl
           This script does the same as gtk.pl but uses the builtin
           message handler concept instead of implementing message
           handling by itself. Advantage of using the builtin
           message handler: no global variables are necessary
           anymore.

   synopsis.pl
           This one proves that the usage shown in the SYNOPSIS
           *really* works ;)

BASIC CONCEPT
   The concept of the Xaudio async API is based on forking an extra
   process (or thread) for the MPEG decoding and playing. The
   parent process controls this process by sending and recieving
   messages. This message passing is asynchronous.

   This module interface provides methods for sending common
   messages to the MPEG process, eg. play, pause, stop. Also it
   implements a message handler to process the messages sent back.
   Eg. every message sent to the subprocess will be acknowledged by
   sending back an XA_MSG_NOTIFY_ACK message (or XA_MSG_NOTIFY_NACK
   on error). Error handling must be set up by handling this
   messages.

   You will find detailed information about the interface of
   this module in its POD documentation

TODO
     - Testing of all methods.
     - Testing under Win32
     - support of the full Xaudio API, with input/output
       modules, etc.
     - documentation: more details about the messages
       hashes
     - runsample.bat for Win32

   Ideas, code and any help are very appreciated.

BUGS
     - samples/gtk*.pl throw some Gdk messages on exit.
       (not really a MPEG::MP3Play bug, I fear it documents
        that I'm a beginner in coding Gtk+ applications ;)
     - the runsample script currently works only under
       Unix, it will fail under Win32

   If you find a bug please send me a report. I will fix this as
   soon as possible. Also I'm very interested to know, if someone
   write applications based on this module. So don't hesitate to
   send me an email, if you like (or not like ;) this module.

AUTHOR
   Joern Reder, [email protected]

COPYRIGHT
   Copyright (C) 1999 by Joern Reder, All Rights Reserved.

   This library is free software; you can redistribute it and/or
   modify it under the same terms as Perl itself.

   The Xaudio SDK is copyright by MpegTV,LLC. Please refer to the
   LICENSE text published on http://www.xaudio.com/.

SEE ALSO
   perl(1), MPEG::MP3Info.

CHANGES
   Revision history for Perl extension MPEG::MP3Play.

   0.06  Mon Sep 06 1999, joern
       - fixed a memory leak in the get_message* methods.
         Thanks to Gene Senyszyn <[email protected]> for the
         detailed bug report