Videoinfompeg

Video::Info::MPEG is a basic MPEG bitstream attribute parser. SYNOPSIS use strict; use Video::Info::MPEG; my $video = Video::Info::MPEG->new( -file => $filename ); $video->probe(); print $file->type; ## MPEG ## Audio information print $file->acodec; ## MPEG Layer 1/2 print... Platforms: *nix