Anyone using File::Extract?

leocharre has asked for the wisdom of the Perl Monks concerning the following question:

Has anybody here made use of File::Extract ?

I would like to write some 'processors' for that.

I tried one of the processors that come with the distro, on a mp3 and I get garble, instead of what I would expect- maybe the id3 tags.

Seems I should be able to say this and not get junk:

use File::Extract
my $x = File::Extract->new();
print $x->extract('./file.mp3')->text;
[download]

That is, if there were no text/id3 tags, I should not get output.

I'm asking the author also. I would like to have a working version of this system. Maybe I'm not understanding this one as it is. Can anyone suggest for or against this distro?

Comment on Anyone using File::Extract? Download Code

Replies are listed 'Best First'.
Re: Anyone using File::Extract? by Anonymous Monk on Sep 11, 2009 at 08:40 UTC
I am trying to do the same thing with rtf. The documentation of the module is really sparse, but only get the ascii content of the rtf instead of extracted txt. Much like the post above. I don't really need the magik mime-type guessing, but it could be nice to offer my extractor for the file::extract family. But I simply cannot make it work. Could anybody provide an example of how to use File::Extract? Thanks! Thanks	[reply]

Replies are listed 'Best First'.

Re: Anyone using File::Extract?
by Anonymous Monk on Sep 11, 2009 at 08:40 UTC

I am trying to do the same thing with rtf. The documentation of the module is really sparse, but only get the ascii content of the rtf instead of extracted txt. Much like the post above. I don't really need the magik mime-type guessing, but it could be nice to offer my extractor for the file::extract family. But I simply cannot make it work. Could anybody provide an example of how to use File::Extract? Thanks! Thanks

[reply]