Select Code to Download

yours makes %names = name => bob => jane
                             joe => sue
                     name2 => john => me
                              oh => my

yours makes %names = name => first => bob 
                             second => jane
...
                              second => me
                              third => oh 
                              fourth => my

use strict;
my %names;
...
  $names{$label}{"third"} = {$name3} 
  $names{$label}{"fourth"} = $name4;
}