Beefy Boxes and Bandwidth Generously Provided by pair Networks
Pathologically Eclectic Rubbish Lister

Re: gd::graph returns unicode

by Khen1950fx (Canon)
on Jul 09, 2013 at 19:43 UTC ( #1043368=note: print w/replies, xml ) Need Help??

in reply to gd::graph returns unicode

According to the author, the use of @data is legacy code. I rewrote it to reflect the newer usage. Note that the usual way to print is...
open(IMG, '>test.png'); binmode IMG; print IMG $gd->png;
The full script:
#!/usr/bin/perl -l use strict; use warnings; use GD::Graph::bars; use GD::Graph::Data; print "Hello world!\n"; my $data = GD::Graph::Data->new([ [1,2,3,4], [5,3,8,9], ]) or die $!; my $graph = GD::Graph::bars->new(); $graph->set( x_label => 'X num', y_label => 'Y num', title => 'Test', ) or die $graph->error; my $gd = $graph->plot($data) or die $!; open(IMG, '>test.png'); binmode IMG; print IMG $gd->png;

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1043368]
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others examining the Monastery: (4)
As of 2017-07-26 01:18 GMT
Find Nodes?
    Voting Booth?
    I came, I saw, I ...

    Results (383 votes). Check out past polls.