d6ca424ea2
intelligently manage binaries, and benchmarking data, with support for interruputed runs, etc. Also, extended the .def format to include enough information to run the benchmarks
17 lines
473 B
Perl
Executable file
17 lines
473 B
Perl
Executable file
#!/usr/bin/perl -w
|
|
|
|
use strict;
|
|
|
|
my $dataSeries = shift @ARGV;
|
|
|
|
my @tok = split /\-/, $dataSeries;
|
|
|
|
my $usage = "Usage $0 GRAPH_NAME-SERIES_NAME\n";
|
|
|
|
@tok == 2 || die $usage;
|
|
#(-r $tok[0]) || (-r $tok[0]) || die ("Couldn't open ."$tok[0]."\n");
|
|
my $seriesLine = `grep Data-Series\: $tok[0].def | grep $tok[1]`
|
|
|| die "No Data-Series entry\n";
|
|
my $range = `grep X-Range\: $tok[0].def` || die "No X-Range entry\n";
|
|
|
|
warn "Series line:\t$seriesLine\rRange:$range";
|