my $h=start(\@cmd,\$in,\$out,\$err);
                while (!eof(FILELIST)) {
                        $thisline=readline(FILELIST);
                        ($thisfile,$thisfilesize)=split(/\t/,$thisline);
                        $in="$thisfile\n";
                        $h->pump;
                        while ($h->pumpable) {
                                $h->pump;
                        }
                        if (length($out)>0) {
                                putmsg($out);
                        }
                        $total+=$thisfilesize;
                        $complete=sprintf("%.2f",$total/$dumpsize);
                        putmsg("$complete%\n");
                }
                finish $h;