my $graph = new GD::Graph::bars( 600, 400 );
......
$page->mediabox(800,600);
......