use Chart::StackedBars; #   (type is one of: Points, Lines, Bars, LinesPoints, Composite,StackedBars, Mountain, Pie, HorizontalBars, Split, ErrorBars, Pareto, Direction) 
use GD;

$obj = Chart::StackedBars->new (740,430);

$obj->set ( 	'title' => "Overview",
				'legend' => 'none', 
				'y_grid_lines' => 'true',
				'title_font' => GD::Font->Large,
				'precision' => 0, 
				'min_val' => 0,
				'colors' => {'grid_lines' => [192,192,192]}
		);
				
 
@data = ( [ 'Jan', 'Feb', 'Mar', 'Apr', 'May', 'Jun', 'Jul', 'Aug', 'Sep', 'Oct', 'Nov', 'Dez' ],
            [ 150,  180,  210, 190, 175 ] );

$obj->png ( "chart.png", \@data );