open (FILE, "security2.txt");

print "\n";

%exe = ( "Catalog", 'C:\Program Files\Internet Explorer\IEXPLORE.EXE', "Crime", 'D:\crime\Reader\AcroRd32.exe');

while (<FILE>) {
  chomp;
  foreach $value (values %exe) {
    $count{$_}++ if ($_ eq $value); 
  }
}

foreach $value (values %exe) {
  print "Name:$value\t Count:$count{$value}\n";
}

close(FILE);