Changeset 30236
- Timestamp:
- Jan 11, 2011, 1:58:34 PM (15 years ago)
- File:
-
- 1 edited
-
trunk/Nebulous/bin/neb-cull (modified) (5 diffs)
Legend:
- Unmodified
- Added
- Removed
-
trunk/Nebulous/bin/neb-cull
r25121 r30236 17 17 18 18 my ($min_copies, $server, $volume, $one_only); 19 19 my ($soft_volume); 20 20 $server = $ENV{'NEB_SERVER'} unless $server; 21 21 … … 25 25 'volume|v=s' => \$volume, 26 26 'one_only|o' => \$one_only, 27 'soft_volume' => \$soft_volume, 27 28 ) || pod2usage( 2 ); 28 29 … … 42 43 unless defined $neb; 43 44 45 if ($volume) { 46 unless (($soft_volume)) { 47 $volume = '~' . $volume; 48 } 49 } 50 44 51 $volume ||= "any"; 45 52 $min_copies ||= 2; … … 48 55 push @cull_args, $key; 49 56 push @cull_args, $volume; 57 58 # print "$key $volume\n"; 59 # print "@cull_args\n"; 60 50 61 51 62 if ($one_only) { … … 95 106 96 107 Symbolic name of the volume to create the new instance on. 108 109 Optional. 110 111 =item * --soft_volume 112 113 Treat the specified volume name as soft, and allow an instance to be culled 114 from another volume if the specified volume does not have an instance. 97 115 98 116 Optional.
Note:
See TracChangeset
for help on using the changeset viewer.
