#!/usr/bin/perl

# This script creates a pdf load diagram from the data in the load.txt file.

$name = "load.txt";

system("gnuplot << EOF
set terminal postscript enhanced color
set output \"load.ps\"
unset key
plot \"load.txt\" using 1:2 w filledcurves x1, \"load.txt\" using 1:4 w filledcurves x1 # , \"load.txt\" using 1:3 w filledcurves x1 
EOF");

system("ps2pdf load.ps");