diff options
| author | Tom Ryder <tom@sanctum.geek.nz> | 2017-08-03 12:30:40 +1200 |
|---|---|---|
| committer | Tom Ryder <tom@sanctum.geek.nz> | 2017-08-03 12:31:21 +1200 |
| commit | 8d6e85b47f4e83a221b6862ee47866f36a0852f3 (patch) | |
| tree | 23879fffa078b1c9d8054cd238376816accc0d86 /checkem | |
| parent | Whittle down to only one stat call (diff) | |
| download | checkem-8d6e85b47f4e83a221b6862ee47866f36a0852f3.tar.gz checkem-8d6e85b47f4e83a221b6862ee47866f36a0852f3.zip | |
Use slightly clearer bitwise ops
Diffstat (limited to 'checkem')
| -rwxr-xr-x | checkem | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -34,7 +34,7 @@ find { wanted => sub { my $fn = $File::Find::name; my $st = stat $fn or return; - return if ~$st->mode & S_IFREG; + return if !( $st->mode & S_IFREG ); return if !$st->size; push @{ $sizes{ $st->size } }, { |