#!/usr/bin/perl -w use strict; use Chart::Gnuplot; # Create the chart object my $chart = Chart::Gnuplot->new( output => "lineStyle_5.png", ); # Data set object my $width = Chart::Gnuplot::DataSet->new( func => "cos(x)", style => "points", pointsize => 3, ); # Plot the graph $chart->plot2d($width);