Select Code to Download

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

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

    print $CGI->redirect($file);