Help for this page

Select Code to Download

Select or download this

 while(<FH>){
my($a,$b,$c)= split(',' , $_);

...
                      'count'   => $c
        } );
}