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