#!/usr/bin/perl -w use strict; use Chart::Gnuplot; # Initiate the chart object my $chart = Chart::Gnuplot->new( output => "chartDim_5.png", title => "Wider and shorter chart", size => '1.1, 0.6', # same as using imagesize in this case ); # Data sets my $dataSet = Chart::Gnuplot::DataSet->new( func => "sin(x)", ); # Plot the graph $chart->plot2d($dataSet);