Help for this page

Select Code to Download


  1. or download this
        push @files , grep { -f  && -s >= $min_size && -s <= $max_size "$d
+/$_" } read_dir($d);
  2. or download this
        push @files, grep { -f && -s _ >= $min_size && -s _ <= $max_size }
+ read_dir( $d, prefix => 1 );
  3. or download this
        push @files, map { -f "$d/$_" && -s _ >= $min_size && -s _ <= $max
+_size ? "$d/$_" : () } read_dir( $d );