Select Code to Download

my @data = ( [ qw ( $date ) ], 
             [ qw ( $aaa_partners ) ], 
             [ qw ( $aaa_arf ) ],
);

$graph->set( dclrs => [ qw(green pink blue cyan) ] );