Help for this page
$pid = open3 ($zipin, $zipout, $ziperr, system("cmd /c zip.exe -FF \"$ +mainfilepath\" --out \"$ziprepairedwordfilepath\""));
$zipin = print "y\r\n";