#!perl # merely loads the getInput routine from the (local) buildInput module use buildSplit; use buildInput; #globals my $dbh; # database handle my $phys_table; # physics table my $phys_table_tag; # physics table tag #globals from arguments my $resplit_column; # resplit column my $resplit_omitstreams; # streams to omit from resplit my $compress_streams; # compress streams #global parameters my $stream_name_used = 1; # 0 means DO NOT use significant stream name buildSplit::getData($stream_name_used,@ARGV);