You need to traverse the directory structure if you want to get the files in the subdirectories. You should use the File::Find module to do that.