if ($_=~/^c_/) {
                $check{$_}="CHECKED"  
                print OUT $in{ $_} ? $in{$_} : '-no data-', "\t";