my $text_label_GREEN = $left_frame->Label->pack(...
my $text_label_RED = $left_frame->Label->pack(...
..