Webmaster Forum / Perl / Tk / June 2006

How do you turn a radio button on from the keyboard by using a key such
as <Return>?
I can use tab to move from widget to widget in my Tk Gui and I can set
many of the values from the keyboard (the scroll bars respond to the

this code works as expected
$mywidget_mlb->bind('<Key-F5>' => sub {
              &{$first_sub};
              &{$second_sub};

i need to have a simple widget to use for data entry to have the
simples and safest check for date. Better if the slosts between fields
(day/month/year) can be shown separated by a symbol( / or - or
whatever). Is there anything ready to use?

NOTE: TK novice here, Old X-windows R3/R4 developer
I'm trying to provide a non-window interface to plug in to existing
perl scripts. So, MainLoop has to be exited after user interaction is
finished.

my app is almost ready (~5k lines) and I'm finishing the make-up for
data entry. I'd like to have the safest data entry possible, ie:
in the fielt gender I want my entry accept only M or F and no more, and
if the user push more valid letters M F M F M F the widget change the

I am converting a perl program from a command line version to a Tk perl
version
So I have a lot of basic questions about Tk perl and some frustrations.
The command line version has a lot of user made choices in which the

How do i get the output of a shell program (STDOUT and STDERR if
possible) into a widget in Perl/TK?
I want my GUI to start `rsync` and the user should get some kind of
feedback.

here is a pogram written in perl/tk using tree widget .
  use strict;
  use Tk;
  use Tk::Label;

(I've managed to get some shiny chrome sortof working, but don't
have anymore time for this, so I'm announcing and hoping someone
can pick up the slack)
An alpha release of Tk::StyledButton is available at

I have a frame containing some widgets and I want to catch some
keybinds from all widget (es esc key destroy the frame regardless which
widget has got the focus). Is it possible to create a keybind for frame
(or a toplevel) that catch the keypress for all widget inside the frame

The message box shown at
http://www.lawshouse.org/download/tk_messagebox.png is produced by a
subroutine within my program.  Here's a snippet of the central part of
the code:

OK, here at work we've just run into a little bug with Tk::HList.
I've got a test case and everything.
If you comment out the line
my $cols = $cols_no_work;

I am using Tk::ExecuteCommand to run a program in background from my
GUI.. ( I am on linux platform).
It works fine. When I click on cancel button of the TK::ExecuteCommand
Widget the called program exists.

Tried putting the two together. Tk-Listbox croaks that it can't find
'listbox' from ListboxDnd, derived from the standard Listbox. What am I
missing, please? The offended piece of code from Tk-Listbox is this:
unless (ref $listbox eq 'Tk::Listbox') {

My current "NoteBook" has too many tabs.  According to the TK book you can
not double row tabs.  Is it possible to list more tabs in a tab or starting
another list of tabs in a tab.
Looking for an example of this.  Any ideas?