Help for this page

Select Code to Download


  1. or download this
    use Tk::Wizard;
use Tk::TextHighlight;
...
    )->pack(-expand => 1, -fill => "both");
  }
);
  2. or download this
    my $t = $frame->Scrolled("TextHighlight" ... syntax => ( $args->{ -syn
+tax } || 'Perl' )