Select Code to Download

use warnings;
use strict;
...
};

my $name = join ' ', @{ $household->{23} }{'first', 'last'};