Select Code to Download

sub chart_me {

...
      );
   }
}

      $chart->add_series(
               name        => $header[ $i ],
               catagories  => xl_range_formula( 'Sheet1', 0, 0, 1, $ma
+xcol ),
               values      => xl_range_formula( 'Sheet1', $rowi, $rowi
+, 1, $maxcol ),
      );

      $chart->add_series(
               name           => $header[ $i ],
...
               catagories     => xl_range_formula( 'Sheet1', 0, 0, 1, 
+$maxcol ),
               values         => xl_range_formula( 'Sheet1', $rowi, $r
+owi, 1, $maxcol ),
      );