use strict;
use warnings;
use Chart::Gnuplot;

    my $chart = Chart::Gnuplot->new(
        output => 'c:\tmp\test.png',
        title  => 'Simple testing',
        xlabel => 'My x-axis label',
        ylabel => 'My y-axis label',
        gnuplot => 'C:\gnuplot\binaries\wgnuplot.exe',
    );

    my $dataSet = Chart::Gnuplot::DataSet->new(
        func => 'sin(x)'
    );

    $chart->plot2d($dataSet);
    
    print "Done...\n";