Help for this page
@{$bros->{$yr}} = grep {!($_->{last} eq $last)} @{$bros->{$yr}};
$bros = { '1958' => [{'first' =>, 'last' =>, etc...], '1959' => [{..}] +, etc..}