run ['cmd.exe', '/c', $program, $type], \$dot, ">", binary(), $out;
# or
run ['start', '/wait', '/b', $program, $type], \$dot, ">", binary(), $out;