while(<COUNT>){
  if(/^$/){}else{
  ($OS_Name,$count)=split /=/;
  chomp($OS_Name);
  chomp($count);
  $OS_Count{$OS_Name}=$count;
}

##</code><code>##

while(<COUNT>){
    next if /^\s*#?\s*$/; # skip blank lines (the hash mark lets you add comments)
    chomp;
    ($OS_Name,$count)   = split /=/;
    $OS_Count{$OS_Name} = $count;
}

##</code><code>##

    print $CGI->redirect($file);