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