Stuff

if ($response_id eq '3') { 
# $test=1;
chdir "/tmp";
# print "$save_as\n";
# open(INPUT, " mplayer -vc null -vo null -ao pcm -benchmark /home/gentux/luniz -slave|");
# && lame audiodump.wav /tmp/luniz.mp3 
open my $input, '-|', "mencoder '$filename' -ovc xvid -oac mp3lame -xvidencopts bitrate=1500 -o '$save_as'";
print "$input";
# pbar();

my $process;
$process = Gtk2::Helper->add_watch( fileno( $pipe ), in => sub {
    if ( eof( $pipe ) ) {print "test1\n";}
    else {print "test2\n";}
    return 1;
} );