my $logfiletextbox = $frame->Scrolled ('Text', 
                            -scrollbars => 'osoe',
                            -background => 'white',
                            -foreground => 'blue');

$logfiletextbox-tagConfigure($tag, -foreground => 'green')if $result =~ /pass/;
$logfiletextbox-tagConfigure($tag, -foreground => 'red')if $result =~ /fail/;