foreach $memberName (@files)<br>{<br> $lst->insert("end","Extracting $memberName..."
;<br> $zip->extractMember($memberName);<br>} <br>$lst is my ListBox used in Tk.<br>$zip is used with Archive::Zip<br><br>I put all the files from the zip into an array.<br>then I use a Foreach loop to step through the array.<br><br>However, the program does not update the "Extracting" text into the listbox until all the zip files have been extracted. Can any1 tell me how to get the display working as it is extracting?
;<br> $zip->extractMember($memberName);<br>} <br>$lst is my ListBox used in Tk.<br>$zip is used with Archive::Zip<br><br>I put all the files from the zip into an array.<br>then I use a Foreach loop to step through the array.<br><br>However, the program does not update the "Extracting" text into the listbox until all the zip files have been extracted. Can any1 tell me how to get the display working as it is extracting?