Select Code to Download

#!/usr/bin/perl -w
use strict;
...
        )->pack();

MainLoop;

The event loop is activated once the Perl/Tk programs MainLoop 
...
 You should check out the X10 codes on CPAN, as well as (I think) Mist
+er House, which,
 when I discovered it, caused me to drop my Perk/Tk X10 project becaus
+e it was so good!