Select Code to Download

#!/usr/bin/perl

...
my $graph = $rp->graph;
print $graph, "\n";
print Dump $graph, "\n";

#!/usr/bin/perl

...

my $grapher = GraphViz::Data::Grapher->new(@winners);
print $grapher->as_svg, "\n";