for my $arr ( @results ) { ... my @row = map { val( $_ ) } @$arr; ... }