Stories
Slash Boxes
Comments
NOTE: use Perl; is on undef hiatus. You can read content, but you can't post it. More info will be forthcoming forthcomingly.

All the Perl that's Practical to Extract and Report

The Fine Print: The following comments are owned by whoever posted them. We are not responsible for them in any way.
 Full
 Abbreviated
 Hidden
More | Login | Reply
Loading... please wait.
  • I was just saying yesterday how much I wished that this existed.

    I'd have named it Audio::Info (after Video::Info).

    The other thing I would have done is used the pure-perl versions, like

        Ogg-Vorbis-Header-PurePerl-0.01
        and
        MP3::Tag or MP3::Info

  • I stole your ogg stuff, then massaged (no autoload).

    http://crazyinsomniac.perlmonk.org/perl/files/Audio-Info-0.01.tar.gz

            use Audio::Info;
            {
                    local $\ = "\n";
                    my $song = Audio::Info->new('t/test.mp3') or die "something's wrong $@";
                    print ref $song; # Audio::Info::MP3