...
my ($tlv, %tlvHash) = @_;
...
my $classArray = $tlvHash{pktClassList};

foreach my $i (@$classArray) {
  print "i = $i\n";
  foreach my $j (@$i) {
    print "j = $j\n";
  }
}