$sysret = qx(prog1 file1 | filter -v $version > $tmpfile 2>&1);