Select Code to Download

for my $directory ( @directory )
{
...
    $dw->setDepth( $depth + 1 );
    $dw->walk( $directory );
}

my $dw = new File::DirWalk;

...
$dw->setDepth( $depth + 1 );

$dw->walk( $_ ) for @directory;