16 |
=item count |
=item count |
17 |
|
|
18 |
Count the number of IDs needed to process the ADD and CHANGE transactions. This |
Count the number of IDs needed to process the ADD and CHANGE transactions. This |
19 |
will produce an listing of the number of feature IDs needed for each |
will produce a listing of the number of feature IDs needed for each |
20 |
organism and feature type. This command is mostly a sanity check: it provides |
organism and feature type. This command is mostly a sanity check: it provides |
21 |
useful statistics without changing anything. |
useful statistics without changing anything. |
22 |
|
|
153 |
|
|
154 |
Trace SQL commands. |
Trace SQL commands. |
155 |
|
|
156 |
|
=item tblFiles |
157 |
|
|
158 |
|
Output TBL files containing the corrected IDs. (B<process> command only) |
159 |
|
|
160 |
=item start |
=item start |
161 |
|
|
162 |
ID of the first genome to process. This allows restarting a transaction run that failed |
ID of the first genome to process. This allows restarting a transaction run that failed |
169 |
use strict; |
use strict; |
170 |
use Tracer; |
use Tracer; |
171 |
use DocUtils; |
use DocUtils; |
|
use TestUtils; |
|
172 |
use Cwd; |
use Cwd; |
173 |
use File::Copy; |
use File::Copy; |
174 |
use File::Path; |
use File::Path; |
181 |
|
|
182 |
# Get the command-line options. |
# Get the command-line options. |
183 |
my ($options, @parameters) = Tracer::ParseCommand({ trace => 3, sql => 0, safe => 0, noAlias => 0, |
my ($options, @parameters) = Tracer::ParseCommand({ trace => 3, sql => 0, safe => 0, noAlias => 0, |
184 |
start => ' '}, |
start => ' ', tblFiles => 0}, |
185 |
@ARGV); |
@ARGV); |
186 |
# Get the command. |
# Get the command. |
187 |
my $mainCommand = lc shift @parameters; |
my $mainCommand = lc shift @parameters; |