#!/usr/bin/perl -w
# zenconv.pl --- Converts Files for play on Creative Zen

use warnings;
use strict;

die "Wrong Number of Args, stupid!\n" if (@ARGV != 2);

exec(
   mencoder     => $ARGV[0],
   -oac         => 'mp3lame',
   -aid         => 128,
   -ovc         => 'xvid',
   -xvidencopts => 'bitrate=-1',
   -vf          => 'scale',
   -zoom,
   -xy          => 320,
   -o           => $ARGV[1],
);