Anonymous user
Empty directory: Difference between revisions
→Thorough version: It shouldn't match any one or two letter file names possibly ending with new line
(Add Seed7 example) |
(→Thorough version: It shouldn't match any one or two letter file names possibly ending with new line) |
||
Line 335:
===Thorough version===
<lang perl>use IO::Dir;
sub dir_is_empty { !grep !/^\.{1,2}
=={{header|Perl 6}}==
|