Changeset 32623
- Timestamp:
- Nov 7, 2011, 1:25:45 PM (15 years ago)
- File:
-
- 1 edited
-
trunk/tools/diskspace/nebulous_wiki.pl (modified) (1 diff)
Legend:
- Unmodified
- Added
- Removed
-
trunk/tools/diskspace/nebulous_wiki.pl
r32622 r32623 7 7 8 8 $opt{S} = 0; 9 getopts('S ',\%opt);9 getopts('SD:',\%opt); 10 10 11 my $dt = DateTime->now; 12 13 my @lt = gmtime; 14 my $dt_data = DateTime->now; 15 $dt->subtract( days => $lt[6]); 16 my $datestring = $dt->ymd; 11 my $datestring; 12 if (exists($opt{D})) { 13 $datestring = $opt{D}; 14 } 15 else { 16 my @lt = gmtime; 17 my $dt = DateTime->now; 18 $dt->subtract( days => $lt[6] ); 19 $datestring = $dt->ymd; 20 } 17 21 18 22 @files = sort ( split /\n/, `neb-ls -p neb:///ipp_diskspace/${datestring}/%neb_usage.dat`);
Note:
See TracChangeset
for help on using the changeset viewer.
