陈钢
and 1 contributors

NAME

Flv::Info::Lite - Another FLV information extract module

SYNOPSIS

  use Flv::Info::Lite qw(flv_info);

  my %info = flv_info($my_flv_filename);
  print $info{'filesize'};
  print $info{'have_audio'};
  print $info{'have_video'};

  print $info{'stereo'};
  print $info{'audiocodecid'};
  print $info{'audiodatarate'};
  print $info{'audiosamplerate'};
  print $info{'audiosamplesize'};

  print $info{'width'};
  print $info{'height'};
  print $info{'encoder'};
  print $info{'duration'};
  print $info{'framerate'};
  print $info{'frame_count'};
  print $info{'videocodecid'};
  print $info{'videodatarate'};

  foreach (keys %info)
  {
    print "$_ => " . $info{$_} . "\n" if $_;
  }

DESCRIPTION

Extract information in Adobe 'FLV' media file for you.

Simple and fast, written in Perl.

EXPORT

None by default.

SEE ALSO

FLV::Info

AUTHOR

Chen Gang, <yikuyiku.com@gmail.com<gt>

COPYRIGHT AND LICENSE

Copyright (C) 2014 by Chen Gang

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.16.2 or, at your option, any later version of Perl 5 you may have available.