my $t1 = $left1->Label(-text => ' ',
                       -background => 'cyan')->pack();

my $t1 = $left1->Label(-text => ' Day  ',
                       -background => 'cyan')->pack();

my $t1 = $left1->Label(-text => ' Week ',
                       -background => 'cyan')->pack();

my $t1 = $left1->Label(-text => ' Month ',
                       -background => 'cyan')->pack();

my $t1 = $left1->Label(-text => ' Year ',
                       -background => 'cyan')->pack();