system ('C:\Program Files\7-Zip\7z.exe',' e ',$archive,' -r',$extdir,$file,' n n') or die $!;
         # maybe n n  should be \n\n ? 
         system ('C:\Program Files\7-Zip\7z.exe', ' e ', $archive,' -r ,$extdir,$file' , "\n\n\") or die $!;