my $gv = $root->Scrolled('GraphViz', 
                             -background => '#B0C0FF', 
                             -scrollbars=>'se',
                             ) ->pack (-side=>'top',-expand 
                                        =>1, -fill=>'both');