Tk::ProgressSplash - create a starting splash screen with a progress bar
BEGIN { require Tk::ProgressSplash; $splash = Tk::ProgressSplash->Show(-splashtype => 'fast', $image, $width, $height, $title, $overrideredirect); } ... use Tk; ... $splash->Update(0.1) if $splash; ... $splash->Update(1.0) if $splash; ... $splash->Destroy if $splash; MainLoop;
Create a splash screen with progress bar.
The Show() method takes the same arguments as the Show() method of Tk::Splash. Additionally you can specify:
Set to "fast" if you want to use Tk::FastSplash instead of Tk::Splash as the underlying splash widget. "normal", "safe" or "slow" may be used for Tk::Splash. Default is "normal".
Advance the progressbar and make it visible, if it was not yet visible. The argument is a floating number between 0 and 1.
Destroy the splash widget.
See Tk::Splash and Tk::FastSplash.
Slaven Rezic (slaven@rezic.de)
Tk::Splash, Tk::FastSplash.
To install Tk::Splash, copy and paste the appropriate command in to your terminal.
cpanm
cpanm Tk::Splash
CPAN shell
perl -MCPAN -e shell install Tk::Splash
For more information on module installation, please visit the detailed CPAN module installation guide.