Mercurial > mplayer.hg
view TOOLS/menc2pass @ 18049:77a3b0d11ca5
Limit the number of entires to the amount that does fit into the chunk.
the function need rewrite as it assumes quite many things that are not guaranteed by the specifications.
author | iive |
---|---|
date | Thu, 06 Apr 2006 20:04:02 +0000 |
parents | 9733351ea3e5 |
children |
line wrap: on
line source
#!/usr/bin/perl -w # Helper script to ease MEncoder two pass encoding # Copyleft 2001 by Felix Buenemann <atmosfear@users.sourceforge.net> # This file comes under GPL, see http://www.gnu.org/copyleft/gpl.html for more # information on it's licensing. use strict; my $mencoder="mencoder"; # Path to MEncoder (including binary name) die <<"EOF" unless @ARGV; Menc2Pass: No arguments given! Please give all usual encoding parameters you would give to mencoder, but leave away the pass=<n> suboption. EOF for(my $i=1; $i<=2; $i++) { my $parm=""; foreach my $val (@ARGV) { if($val =~ /-lavcopts/) { $parm.="$val vpass=$i:"; } elsif($val =~ /-(divx4)|(xvid)opts/) { $parm.="$val pass=$i:"; } else { $parm.="$val "; } } print "Running $mencoder $parm\n"; system($mencoder,$parm) and die "MEncoder pass $i failed!\n" }