Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl

###########################################################
...
&createMyThread();
&createMyGui();
&MainLoop();
  2. or download this
    package My::Globals;

...
# NONE

1;
  3. or download this
    package My::Gui;

###########################################################
...
}

1;
  4. or download this
    package My::ThreadManager;

...
# NONE

1;
  5. or download this
    package My::ThreadWorker;

###########################################################
...

    print "\n";        
}