$ perl -wE'
my $aref = [ { name => 'Fred' }, { name => 'Barney' }, { no_name => 'Wilma' } ];
say for map { $_->{name} || 'No name' } @{ $aref };
'
Fred
Barney
No name