Select Code to Download

ABC|123|CHECK|1|
DEF|456|CHECK|1|
...
DEF|456|KCEHC|1|
GHI|789|KCEHC|1|
JKL|101|KCEHC|2|

#!/usr/bin/env perl

...
$c = $count{$key};
$c1 = $count{$key};
}

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

$c=$count{'CHECK'};
$c1=$count{'KCHEC'};