Select Code to Download

use strict;
use warnings;
...
4    CANNING    81302
4    MULTIPACK    67542
4    QUEST    1879

$VAR1 = {
          'CANNING' => {
...
                           '2' => '14878'
                         }
        };