Mercurial > mplayer.hg
view TOOLS/menc2pass @ 8932:967a1d1f70c6
The following patch adds a call to srand() with the current time at the
start of main(). It makees "-shuffle" to works as expected.
Krister Lagerstrom <krister@kmlager.com>
author | arpi |
---|---|
date | Sun, 12 Jan 2003 22:40:51 +0000 |
parents | 7a5021d0a2de |
children | ee0c2391e45d |
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 files comes udner 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 switch. EOF for(my $i=1; $i<=2; $i++) { system($mencoder,@ARGV," -pass $i") and die "MEncoder pass $i failed!\n" }