$string='Match'; # #define Itemstyles # $tree1_match_style = $tree1->ItemStyle('text', -foreground=>'green'); $tree2_match_style = $tree1->ItemStyle('text', -foreground=>'green'); # #add node to tree1 and tree2 # $tree1->add($indent0_line,-text=> $indent0_line,-itemtype=>'text'); $tree2->add($indent0_line,-text=> $indent0_line,-itemtype=>'text'); # #add style to node entry # $tree1->entryconfigure($indent0_line,-style=>$tree1_match_style); # # #retrieve style from node # my $wanted_style = $tree1->entrycget($indent0_line, q{-style}); # #configure tree2 node with retrieved style from tree1 node # $tree2->entryconfigure($indent0_line,-style=>$wanted_style);