Re: How to tell if a Directory is Empty

[tos]

# ls
1  2  3  4  5
# ls -al *
1:
total 0
drwxr-xr-x 2 root root  6 Apr 14 13:22 .
drwxr-xr-x 7 root root 46 Apr 14 13:22 ..

2:
total 4
drwxr-xr-x 2 root root 16 Apr 14 13:22 .
drwxr-xr-x 7 root root 46 Apr 14 13:22 ..
-rw-r--r-- 1 root root  5 Apr 14 13:22 two

3:
total 0
drwxr-xr-x 2 root root  6 Apr 14 13:22 .
drwxr-xr-x 7 root root 46 Apr 14 13:22 ..

4:
total 4
drwxr-xr-x 2 root root 17 Apr 14 13:22 .
drwxr-xr-x 7 root root 46 Apr 14 13:22 ..
-rw-r--r-- 1 root root  5 Apr 14 13:23 four

5:
total 0
drwxr-xr-x 2 root root  6 Apr 14 13:22 .
drwxr-xr-x 7 root root 46 Apr 14 13:22 ..
# perl -we 'use Data::Dumper;@d=grep {<$_/*>} (<*>);print Dumper \@d'
$VAR1 = [
          '2',
          '4'
        ];
# perl -we 'use Data::Dumper;@d=grep {!<$_/*>} (<*>);print Dumper \@d'
$VAR1 = [
          '1',
          '3',
          '5'
        ];
#