#!/usr/bin/perl -w use strict; use Chart::Gnuplot; # Initiate the chart object my $chart = Chart::Gnuplot->new( output => "axisTics_5.png", xlabel => "Tic labels in times-italic", xtics => { font => "Times-Italic", }, ); # Data set object my $dataSet = Chart::Gnuplot::DataSet->new( func => "sin(x)", ); # Plot the graph $chart->plot2d($dataSet);