How to set default text on Tk::Text

From: Ramprasad A Padmanabhan (ramprasad.padmanabhan_at_oracle.com)
Date: 09/30/04 

To: perl beginners <beginners@perl.org>
Date: Thu, 30 Sep 2004 13:00:51 +0530

I am creating a TK widget with a TK::Text textbox.

I want to set the default text value as "hi" like this

$txt = $mw->Text(
                 # -data =>"hi", # This does not work
                 -width => '10',
                   -height => '10')->pack;

But this is not working. Any clues ?

Thanks
Ram