Plot coordinate pairs: Difference between revisions
m
→{{header|Perl}}: use PNG format for both libraries
SqrtNegInf (talk | contribs) m (→{{header|Perl}}: use PNG format for both libraries) |
|||
Line 2,287:
=={{header|Perl}}==
===GD::Graph library===
{{libheader|GD::Graph}}
<lang perl>use GD::Graph::points;
Line 2,294 ⟶ 2,297:
[2.7, 2.8, 31.4, 38.1, 58.0, 76.2, 100.5, 130.0, 149.3, 180.0],
);
$graph = GD::Graph::points->new(400, 300);▼
▲$graph = GD::Graph::points->new(400, 300);
▲open my $fh, '>', "qsort-range-10-9.$format";
binmode $fh;
print $fh $
close $fh;</lang>
===Imager::Plot library===
{{libheader|Imager::Plot}}
<lang perl>use Imager;
| |||