-
Notifications
You must be signed in to change notification settings - Fork 2
Expand file tree
/
Copy pathtestrunner_exampleScript.pl
More file actions
52 lines (42 loc) · 1.96 KB
/
testrunner_exampleScript.pl
File metadata and controls
52 lines (42 loc) · 1.96 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
#!/usr/bin/perl
use strict;
use Data::Dumper;
###########################################
# An example perl script that will perform a batch run of the Java code.#
############################################
#lower threshold for sep tests
system("java -Xmx200000M Classify -I -V 10 -P sep -T " . 1e-3 . " -C SMONBLOMV3");
for (my $threshold = 4; $threshold < 9; $threshold += 1) {
my $newTR = 10 ** (-$threshold);
system("java -Xmx200000M Classify -NH -I -V 10 -P sep -T $newTR -C SMONBLOMV3");
}
system("java -Xmx200000M Classify -I -V 10 -P sep -T " . 1e-3 . " -WC -C SMONBLOMV3");
#lower threshold for sep WC tests
for (my $threshold = 4; $threshold < 9; $threshold += 1) {
my $newTR = 10 ** (-$threshold);
system("java -Xmx200000M Classify -NH -I -V 10 -P sep -T $newTR -WC -C SMONBLOMV3");
}
#lower threshold for comDQDPMP tests
system("java -Xmx200000M Classify -I -V 10 -P comDQDPMP -T " . 1e-3 . " -C SMONBLOMV3");
for (my $threshold = 4; $threshold < 9; $threshold += 1) {
my $newTR = 10 ** (-$threshold);
system("java -Xmx200000M Classify -NH -I -V 10 -P comDQDPMP -T $newTR -C SMONBLOMV3");
}
#lower threshold for comDQDPMP WC tests
system("java -Xmx200000M Classify -I -V 10 -P comDQDPMP -T " . 1e-3 . " -WC -C SMONBLOMV3");
for (my $threshold = 4; $threshold < 9; $threshold += 1) {
my $newTR = 10 ** (-$threshold);
system("java -Xmx200000M Classify -NH -I -V 10 -P comDQDPMP -T $newTR -WC -C SMONBLOMV3");
}
#lower threshold for com tests
system("java -Xmx200000M Classify -I -V 10 -P com -T " . 1e-3 . " -C SMONBLOMV3");
for (my $threshold = 4; $threshold < 9; $threshold += 1) {
my $newTR = 10 ** (-$threshold);
system("java Classify -NH -I -V 10 -P com -T $newTR -C SMONBLOMV3");
}
#lower threshold for com WC tests
system("java -Xmx200000M Classify -I -V 10 -P com -T " . 1e-3 . " -WC -C SMONBLOMV3");
for (my $threshold = 4; $threshold < 9; $threshold += 1) {
my $newTR = 10 ** (-$threshold);
system("java Classify -NH -I -V 10 -P com -T $newTR -WC -C SMONBLOMV3");
}