#!/usr/bin/perl -w
use strict;
use Chart::Gnuplot;
# Create the chart object
my $chart = Chart::Gnuplot->new(
output => 'gallery/grid_9.png',
xtics => {
minor => 4
},
ytics => {
minor => 4
},
grid => {
linetype => 'longdash, dot-longdash',
color => 'light-blue',
width => '3, 1',
xlines => 'off, on',
},
);
# Data set object
my $data = Chart::Gnuplot::DataSet->new(
func => 'sin(x)',
);
# Plot the graph
$chart->plot2d($data);