Perl/Tkx equivalent to Perl/Tk's 'repeat'

[email protected] ("Swingle David-QWHM86")
Newsgroups perl.tcltk
Message-ID <[email protected]>
In the following code snippet, I use 'repeat' to call a subroutine
(UpdateCurrentProgress()) once every 100ms.  Is there something
equivalent in Perl/Tkx?
 
my $frame = MakeFrame("Build Progress:", $g_buttonFrame);
$g_progressLabel = $frame->Label(-text => "Initializing...",
                                 -font => $textFont,
                                 -width => 90,
                                 -relief => 'sunken')->pack(-side =>
'left');
$g_progressLabel->configure(-font => [-weight => 'bold']);
$g_progressLabel->repeat(100, sub { UpdateCurrentProgress() });
 
 
And, are there any hints on how to translate the Tcl/Tk documentation to
Perl/Tkx?  For example, I don't know how to interpret the following and
translate it into Perl/Tkx.
 
pathName configure ?option? ?value option value ...?
Query or modify the configuration options of the widget. If one or more
option-value pairs are specified, then the command modifies the given
widget option(s) to have the given value(s); in this case the command
returns an empty string. If option is specified with no value, then the
command returns a list describing the named option: the elements of the
list are the option name, database name, database class, default value,
and current value. If no option is specified, returns a list describing
all of the available options for pathName. 
 
Dave
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.