in reply to Use of uninitialized value $file in concatenation
What happens when @grepped is empty?
Improve your skills with Modern Perl: the free book.