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();

##</code><code>##

 
with ($left1) {
    default -background => 'cyan';
    chain { pack() };

    Label(-text => ' ');
    Label(-text => ' Day  ');
    Label(-text => ' Week ');
    Label(-text => ' Month ');
    Label(-text => ' Year ');
}