my %hash = ('perl' => 1 , 'C' => 0) ;