… | … | ||
---|---|---|---|
64 | 64 | ||
65 | &scan ("$path$_") for @$dirs; | 65 | &scan ("$path$_") for @$dirs; |
66 | }; | 66 | }; |
67 | } | 67 | } |
68 | 68 | ||
69 | IO::AIO::max_outstanding 400; | 69 | IO::AIO::max_outstanding 400; # two fds per directory, so limit accordingly |
70 | IO::AIO::min_parallel 20; | 70 | IO::AIO::min_parallel 20; |
71 | 71 | ||
72 | for my $seed (@ARGV) { | 72 | for my $seed (@ARGV) { |
73 | $seed =~ s/\/+$//; | 73 | $seed =~ s/\/+$//; |
74 | aio_lstat "$seed/.", sub { | 74 | aio_lstat "$seed/.", sub { |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |