#!/usr/bin/perl -w use strict; use Chart::Gnuplot; # Initiate the chart object my $chart = Chart::Gnuplot->new( output => "axisLabel_1.png", title => "Default format of the axis labels", xlabel => "x-label", ylabel => "y-label", x2label => "x2-label", y2label => "y2-label", ); # Data sets my $dataSet = Chart::Gnuplot::DataSet->new( func => "sin(x)", ); # Plot the graph $chart->plot2d($dataSet);