Mega Code Archive

 

Categories / Perl / GUI

 

Set Label relief (border) to sunken

use Tk; my $main = MainWindow->new; $main->Label(-text => 'Hello!',     -relief => 'sunken' )->pack; MainLoop;