$pb->configure( -from => 0, -to => 20, -variable => \$progress, ## store the reference. ); $progress = 0;