1234
my @name; foreach my $cust (@$customer){ push(@name, $cust->name); }
1 2 3 4
my @name = ('hans','franz','peter'); my @customer = ('detlef','achim'); push @name,@customer; print join(',',@name);
my @name = map {$_->name} @$customer;