我如何從perl的

Question

調用gnuplot的腳本有gnu.gp文件：

# grphist.conf 
set terminal canvas 
#Terminal type set to 'canvas' 
#Options are ' solid butt size 600,400 fsize 10 lw 1 fontscale 1 standalone' 
set output 'output.html' 

set grid 
set xtic rotate by 90 
set style data histograms 
set style fill solid 1.00 border -1 
#$ cat grphist.conf | gnuplot 
plot "c_time" using 2:xtic(1) title "time to number of UIDs" 

但是，我必須這樣用perl腳本集成。

Answer 1

`gnuplot <your file>`; #linux 
`wgnuplot.exe <your file>`; #win 

或

system("gnuplot <your file>"); #linux 
system("wgnuplot.exe <your file>"); #win 

或

exec("gnuplot <yout file>"); #linux 
exec("wgnuplot.exe <your file>"); #win 

你選擇什麼取決於：

What's the difference between Perl's backticks, system, and exec?

Answer 2

您可以打開一個管道GNUPLOT：

use autodie qw(:all); 
open my $GP, '|-', 'gnuplot'; 

print {$GP} <<'__GNUPLOT__'; 
    set xrange [-5:5]; 
    plot sin(x); 
__GNUPLOT__ 

close $GP; 

或者，您可以在CPAN上找到Chart::Gnuplot。