Changeset 28668

Show
Ignore:
Timestamp:
21.11.2013 19:00:03 (6 years ago)
Author:
ak19
Message:

Handling the sorting option to Jdb2Txt

Files:
1 modified

Legend:

Unmodified
Added
Removed
  • main/trunk/greenstone2/bin/script/jdb2txt.pl

    r28402 r28668  
    5353use File::Basename; 
    5454 
    55 if (scalar(@ARGV)==0) { 
     55if (scalar(@ARGV) < 1 || scalar(@ARGV) > 2 || (scalar(@ARGV) == 2 && $ARGV[0] ne "-sort")) { 
    5656    my ($progname,$dir) = &File::Basename::fileparse($0); 
    5757 
    58     print STDERR "Usage: $progname file.jdb\n"; 
     58    print STDERR "Usage: $progname [-sort] file.jdb\n"; 
    5959    exit -1; 
    6060}