Hi there,
The first few releases of the Tkx module have now been uploaded to
CPAN. You can browse it at:
http://search.cpan.org/dist/Tkx/
Tkx:: is like Tcl::Tk a Perl interface to Tk based on the Tcl::
module, but Tkx:: has a much simpler and more regular API. Unlike
Tcl::Tk, compatibility with Tk:: is not a goal for Tkx::. The main
idea behind Tkx:: is that it's just a very thin wrapper on top of Tcl,
i.e. that what you get is exactly the behaviour you read about in the
Tcl/Tk documentation with no surprises added by the Perl layer.
The Tkx:: interface has been developed by ActiveState and is currently
used to implement the GUI front-ends of the ActiveState PDK tools.
For the curious, this is how a simple "Hello world" program might look
like using Tkx:
use Tkx;
my $mw = Tkx::widget->new(".");
my $b = $mw->new_button(
-text => "Hello, world",
-command => sub { $mw->g_destroy; },
);
$b->g_pack;
Tkx::MainLoop()
Hope you like it!
Regards,
Gisle Aas,
ActiveState
