in reply to folder properties / modified date
use Win32::AdvNotify; $aobj = new Win32::AdvNotify(); $thread = $aobj->StartThread(Directory => 'C:\monks', Filter => All, WatchSubtree => 0) or die "monkwatcher cannot start\n";
hope that helps,use Win32::DirSize; chomp(my $dir = shift || <DATA>); my @dirstats; push @dirstats,sprintf("%-40s%-10s%-10s%-10s\n", "Directory", "Size", "FileCount", "DirCount"); if (dir_size($dir, my $dirstat) == DS_RESULT_OK){ my $size = best_convert(my $unit, $dirstat->{HighSize}, $dirstat->{LowSize}); my $filecount = $dirstat->{FileCount}; my $dircount = $dirstat->{DirCount}; push @dirstats, sprintf("%-40s%-10s%-10s%-10s\n", $dir, sprintf("%8.4f", $size) . $unit, $filecount, $dircount); } push @dirstats, undef; map { print } grep { defined } @dirstats; __DATA__ \\captains\nemo$\nautilus
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re: folder properties / modified date
by Foggy Bottoms (Monk) on Jul 21, 2003 at 13:25 UTC | |
by Foggy Bottoms (Monk) on Jul 21, 2003 at 13:58 UTC |