use
strict;
{
# Line
my
$chart
= Google::Chart->create(
Line
=> (
size
=>
"400x300"
,
)
);
$chart
->add_dataset(
data
=> [ 1, 2, 3, 4, 5 ],
);
ok(
$chart
);
isa_ok(
$chart
,
"Google::Chart"
);
is(
$chart
->width, 400 );
is(
$chart
->height, 300 );
my
$uri
=
$chart
->as_uri;
note
$uri
;
my
%h
=
$uri
->query_form;
is(
$h
{cht},
"lc"
);
is(
$h
{chs},
"400x300"
);
test_render(
$chart
);
}