Ticket #9207: stream_flv.pl.diff

File stream_flv.pl.diff, 520 bytes (added by anonymous, 10 years ago)

give the video filesize a 5% overhead

  • .pl

    old new  
    9999    if ($dur && $dur =~ /\d*:\d*:.*/) {
    100100        @times = split(':',$dur);
    101101        $lengthSec = $times[0]*3600+$times[1]*60+$times[2];
    102         $size = int($lengthSec*($vbitrate*1000+$abitrate*1000)/8);
     102        $size = 1.05*int($lengthSec*($vbitrate*1000+$abitrate*1000)/8);
    103103        print header(-type => 'video/x-flv','Content-Length' => $size);
    104104    } else {
    105105        print header(-type => 'video/x-flv');