how to make readonly text area in perl

[pradeeps]

i want to make my text area readonly. is there any way to do that in perl.

any help,appreciate .......

[nithinpes]

Please be more clear while posting questions. If you are referring to Textbox in Perl-Tk, you can set this by using the '-state' option. After inserting required data in textbox, you may configure the state as 'disabled'. E.g.

my  $tx= $fr->Scrolled( 'Text', '-scrollbars' => 'e', '-background' => 'white',       
  )->pack( -fill => 'both', -expand => 1, -side => 'bottom' );
$tx->insert('insert', "characters of line1\n");
$tx->insert('insert',"characters of line2\n"');
$tx->insert('insert',"characters of line3\n");
$tx->insert('insert',"characters of line4\n");
$tx->configure('-state'=> 'disabled'); ## set the state as disabled (non-editable)

- Nithin

[pradeeps]

thanks a lot nithin it worked.sorry i mean text box.ok.