Re: User Feedback for Subroutines with Long Execution Time

[petesmiley]

There are some good answers here, but they strike me as a little complicated. Why not just pass a reference to a sub that handles the info. Then all you have to do in your subroutine is call the reference on each iteration.

This is good if you're not looking for something pretty, and takes about 3 extra minutes to code.

smiles

[arden]

Re: User Feedback for Subroutines with Long Execution Time by petesmiley
There are some good answers here, but they strike me as a little complicated. Why not just pass a reference to a sub that handles the info. Then all you have to do in your subroutine is call the reference on each iteration.
This is good if you're not looking for something pretty, and takes about 3 extra minutes to code.

smiles


---


My thoughts exactly. I did something like this with a Perl/Tk script which compressed VERY large files. I re-wrote Zip.pm to include a referenced variable in which I put the percentage done. Then I just updated the TopLevel widget regularly.
-Arden.

[Notromda]

For those not familiar with graphical interfaces, this is often called a "callback". In any case, one must assume that your long running process has a way of knowing how far along it is, and you'll have to have various points in the process explicitly call the callback with the current status report.

sub statusPrint {
# code to update status
  print shift;
}

sub longprocess {
   my &status = shift;
   #do stuff
   &status("10%");

   #more stuff

   &status("20%");
}

call it with:
longprocess (\&statusPrint);