my @foo = @{ $self->{TABLE}{6} };
print "$foo[0]\n";