Select Code to Download

my $dir = "/home/gaurav/Documents";
opendir my $dh, $dir or die "Couldn't open $dir: $!";
...
    
    # ...do file tests against $file here
}

my $dir = "/home/gaurav/Documents";
opendir my $dh, $dir or die "Couldn't open $dir: $!";
...
    
    # ...do file tests against $_ here
}