equal
deleted
inserted
replaced
23 "ForceSystem" => "-force", |
23 "ForceSystem" => "-force", |
24 ); |
24 ); |
25 |
25 |
26 #----Get format and transform options if specified |
26 #----Get format and transform options if specified |
27 my %Options; |
27 my %Options; |
28 getopts("hws:t:c:",\%Options); |
28 getopts("hws:t:c:q:",\%Options); |
29 |
29 |
30 #----Usage |
30 #----Usage |
31 sub usage() { |
31 sub usage() { |
32 print("Usage: remote_atp [<options>] <file_name>\n"); |
32 print("Usage: remote_atp [<options>] <file_name>\n"); |
33 print("Options:\n"); |
33 print("Options:\n"); |
34 print(" -h print this help\n"); |
34 print(" -h print this help\n"); |
35 print(" -w list available ATPs\n"); |
35 print(" -w list available ATPs\n"); |
36 print(" -s<system> ATP to use\n"); |
36 print(" -s<system> ATP to use\n"); |
37 print(" -t<time_limit> CPU time limit for ATP\n"); |
37 print(" -t<time_limit> CPU time limit for ATP\n"); |
38 print(" -c<command> custom ATP invocation command\n"); |
38 print(" -c<command> custom ATP invocation command\n"); |
|
39 print(" -q<num> quietness level (0 = most verbose, 3 = least verbose)\n"); |
39 print(" <file_name> TPTP problem file\n"); |
40 print(" <file_name> TPTP problem file\n"); |
40 exit(0); |
41 exit(0); |
41 } |
42 } |
42 if (exists($Options{'h'})) { |
43 if (exists($Options{'h'})) { |
43 usage(); |
44 usage(); |
69 $URLParameters{"TimeLimit___$System"} = $Options{'t'}; |
70 $URLParameters{"TimeLimit___$System"} = $Options{'t'}; |
70 } |
71 } |
71 #----Custom command |
72 #----Custom command |
72 if (exists($Options{'c'})) { |
73 if (exists($Options{'c'})) { |
73 $URLParameters{"Command___$System"} = $Options{'c'}; |
74 $URLParameters{"Command___$System"} = $Options{'c'}; |
|
75 } |
|
76 #----Quietness |
|
77 if (exists($Options{'q'})) { |
|
78 $URLParameters{"QuietFlag"} = "-q" . $Options{'q'}; |
74 } |
79 } |
75 |
80 |
76 #----Get single file name |
81 #----Get single file name |
77 if (exists($URLParameters{"ProblemSource"})) { |
82 if (exists($URLParameters{"ProblemSource"})) { |
78 if (scalar(@ARGV) >= 1) { |
83 if (scalar(@ARGV) >= 1) { |