Select Code to Download

my $gd=$graph->plot(\@bar_data)->$format() or die $graph->error;
print '<img src=http://foobar.com/foobar.pl?image=$gd&format=$format>'
+;