Help for this page

Select Code to Download


  1. or download this
    use strict;
    use warnings;
    ...
    
    my @nonZeroLengthFiles = grep -s, <$dir*>;
    print "$_\n" for @nonZeroLengthFiles;