my @files = `ls -l /dir/to/be/search`; foreach my $file (@files) { do whatever }