Help for this page
#!/usr/bin/perl ... print Dumper $hash; done_testing();
#!/usr/bin/perl ... }; print scalar @{$hash->{'100'}};