Video::Info::Magic - Resolve video filetype if possible.

  use strict;
  use Video::Info::Magic qw(:all);

  my $type = divine('/path/to/video.mpg' );

  print $type; #MPEG system stream data (maybe)

  ## ... see methods below

various constants related to video file formats. All are prefixed with "VIDEO_".

divine(): Employs /usr/share/magic entries to determine a file's type, as well as GUID and other info from Microsoft, mplayer, transcode...

 Copyright (c) 2002
 Aladdin Free Public License (see LICENSE for details)
 Allen Day <allenday@ucla.edu>

Video::Info. magic.