File::Find::Rule
use File::Find::Rule; my $rule = File::Find::Rule->name('*.JPG') ->file() ->size('>2M'); ->start(@directory_list); while ( defined(my $image = $rule->match) ) { say $image; }
use File::Find::Rule; my $rule = File::Find::Rule->name('*.JPG') ->file() ->size('>2M'); ->start(@directory_list); while ( defined(my $image = $rule->match) ) { say $image; }