for (group(3, @dynval3)) {
        my ($newname, $name, $val) = @$_;
        ...
    }