push @files , grep { -f  && -s >= $min_size && -s <= $max_size "$d/$_" } read_dir($d);

##</code><code>##

    push @files, grep { -f && -s _ >= $min_size && -s _ <= $max_size } read_dir( $d, prefix => 1 );

##</code><code>##

    push @files, map { -f "$d/$_" && -s _ >= $min_size && -s _ <= $max_size ? "$d/$_" : () } read_dir( $d );