Select Code to Download

$VAR1 = 'CHECK';
$VAR2 = 7;
$VAR3 = 'KCHEC';
$VAR4 = 4;

$c  = $count{'KCEHC'}; #4
$c1 = $count{'CHECK'}; #7

foreach $key(%count){
$c = $count{$key};
$c1 = $count{$key};
}

$c = 4;
$c1= 4;

KCHEC=4
CHECK=7