my @files = File::Find::Rule->file()->in($logShare);
foreach my $test (@files)
{
    
open FILE, $test or die $!;
binmode FILE;
my ($buf, $data, $n);
while (($n = read FILE, $data, 1000) != 0) {
  print "$n bytes read\n";
  print "$test \n";
  $buf .= $data;
}
close(FILE);
}