Select Code to Download

if ( -s "/tmp/$strHostname/polling.txt") {
my @ndmpselect;
...

                            }
}

my @list = (@lines);
foreach (@lines) {
...
                        or die "Cannot open file '$file' for writing: 
+$!";
                            $dmphash{$_} = $fh;
                                }