Hi AM,

You just use the insert method on your Entry widget to insert your text in the widget. It doesn't matter if it's part of a table or not.

#! /usr/bin/perl -w

use strict;
use Tk;
use Tk::Table;

my $m = MainWindow->new;

my $t = $m->Table(-rows => 1, -columns => 1, -scrollbars => '')->pack;
my $w = $t->Entry;  # Here is our entry widget

$t->put(1,1,$w);    # Place it in the table

$w->insert('end', 'initial text');  # Insert "initial text"

MainLoop;
[download]

Update: rbc is on the money too. You *just* beat me! :)

Good luck, {NULE}
--
http://www.nule.org