#!/usr/bin/perl -w use strict; use Chart::Gnuplot; # Initiate the chart object my $chart = Chart::Gnuplot->new( output => "axisLabel_7.png", xlabel => { text => "Super^{script} and sub_{script}", enhanced => 'on', }, ); # Data sets my $dataSet = Chart::Gnuplot::DataSet->new( func => "sin(x)", ); # Plot the graph $chart->plot2d($dataSet);