is there any way to redirect a format to TK::Text

hi,everyone: i have a trouble in TK,please help me.i have a format like this format ALARMLABEL_TOP = ALARM REPORT ___ NodeName :@||| $node Time :@ ,Priority: @ $time, $priority Alarm_d

Re: is there any way to redirect a format to TK::Text

have you try using formline and $^A you might want to try something like: my $var1 = abcd; my $var2 = wxyz; my $var3 = 1234; $^A = undef; #-- just in case formline HEADER,$var1,$var2,$var3; -- @ @ @ -- HEADER #-- $header