Hello all - I've written a new module called Mediainfo that I'm planning to
put on CPAN.
Take a look at the documentation(produced by pod2text) and tell me what you
think.
thank you for your time.
NAME
Mediainfo - Perl interface to Mediainfo
SYNOPSIS
use Mediainfo qw(mediainfo);
my %info = mediainfo("/root/foo.mp4");
DESCRIPTION
This module is a thin layer above "Mediainfo" which supplies technical
and tag information about a video or audio file.
<http://mediainfo.sourceforge.net/>.
EXAMPLES
use Mediainfo qw(mediainfo);
my %info = mediainfo("/root/foo.mp4");
print $info{'filename'};
print $info{'filesize'};
print $info{'container'};
print $info{'length'};
print $info{'bitrate'};
print $info{'video_codec'};
print $info{'video_format'};
print $info{'video_length'};
print $info{'video_bitrate'};
print $info{'width'};
print $info{'height'};
print $info{'fps'};
print $info{'fps_mode'};
print $info{'dar'};
print $info{'frame_count'};
print $info{'audio_codec'};
print $info{'audio_format'};
print $info{'audio_length'};
print $info{'audio_bitrate'};
print $info{'audio_rate'};
print $info{'have_video'};
print $info{'have_audio'};
AUTHOR
Written by ChenGang, [email protected]
COPYRIGHT
Copyright (c) 2011 ChenGang. This library is free software; you can
redistribute it and/or modify it under the same terms as Perl itself.
SEE ALSO
Video::Info, Movie::Info