Select Code to Download

use strict;
use warnings;
...
print $g->as_png;

use GraphViz;
use GraphViz::Data::Structure;
...
my $g = GraphViz->new(%othergraphvizopts);
my $g1 = GraphViz::Data::Structure->new($structure, GraphViz => $g);
print $g->as_png;