Select Code to Download

your code shows in this way.

...
                 ]
               ], 'GD::Graph::Data' );

my $data = GD::Graph::Data->new([
...
                 ]
               ], 'GD::Graph::Data' );