Changeset 29127 for trunk/DataStore/scripts/dsgetfileset
- Timestamp:
- Sep 8, 2010, 2:45:04 PM (16 years ago)
- File:
-
- 1 edited
-
trunk/DataStore/scripts/dsgetfileset (modified) (4 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/DataStore/scripts/dsgetfileset
r27905 r29127 17 17 use File::Basename qw( basename ); 18 18 19 my ($uri, $outdir, $timeout, $skip_checks, $unpack, $ no_proxy, $verbose);19 my ($uri, $outdir, $timeout, $skip_checks, $unpack, $first_file, $no_proxy, $verbose); 20 20 21 21 GetOptions( … … 25 25 'skip-checks' => \$skip_checks, 26 26 'unpack' => \$unpack, 27 'first-file=s' => \$first_file, 27 28 'no-proxy' => \$no_proxy, 28 29 'verbose|v' => \$verbose, … … 75 76 } 76 77 78 if ($first_file) { 79 next if $fs->fileid ne $first_file; 80 $first_file = undef; 81 } 77 82 my $uri = $fs->uri; 78 83 my $base = basename($uri); … … 155 160 Uncompress fits files if compressed 156 161 162 =item * --first-file <fileid> 163 164 Skip files prior to fileid in fileset 165 157 166 Optional. 158 167
Note:
See TracChangeset
for help on using the changeset viewer.
