Perl: Glob subdirectories recursively

Question

How do I recursively include subdirectories in an array using glob?

I currently have my @files = glob $PATH . '/*'; (where $PATH = ".") but this does not include subdirectories.

Answer 1

If you like to stick with standard modules you can use this code.

use strict;
use warnings;
use File::Find;

my @files;
find( { wanted => sub { push @files, $_ }, no_chdir => 1 }, $PATH );

Answer 2

I found my answer from Here

I just changed @files to be my @files = File::Find::Rule->in($PATH);