Select Code to Download

my $directory = ".\\folder";
opendir (DIR, $directory) or die $!;
...
                         if ($fldr =~ m/log?/){
                         print $fldr, "\n";
                         } }

(10.10.10.1).log
(10.10.10.2).log
..................
..................
Press any key to continue . . .