$t->tagConfigure("wrong",-foreground=>"red");	
$t->tagAdd("wrong","$start","$end_pt");