stasis-aries-wal/benchmarks/generateScriptsThreads.pl

36 lines
715 B
Perl
Raw Normal View History

2004-10-20 23:02:16 +00:00
#!/usr/bin/perl -w
use strict;
## This perl script generates the input to timer.pl, which in turn
## generates the input to plotting.pl, which generates performance
## graphs. :)
open(LOGICAL_THREADS, ">LOGICAL_THREADS.script" );
for(my $i = 1; $i < 10; $i ++) {
my $total = 500000;
my $thread_count = $i;
my $insert_count = $total / $i;
print LOGICAL_THREADS "./logicalMultThreaded $thread_count $insert_count\n";
}
for(my $i = 10; $i <= 254; $i += 10) {
my $total = 500000;
2004-10-20 23:02:16 +00:00
my $thread_count = $i;
my $insert_count = $total / $i;
print LOGICAL_THREADS "./logicalMultThreaded $thread_count $insert_count\n";
}
close(LOGICAL_THREADS);