Help for this page
package itemDispatch; ... } 1;
package doWork; ... } 1;
use strict; ... $PROGRESS += $progress; $mw->update; }