my $data = GD::Graph::Data->new([
    [@word],
    [@count_word],
]) or die GD::Graph::Data->error;