如何使用Perl包装器Search :: Elasticsearch在Elastic Search中使用update_by_query插入多个属性

Question

我想使用Perl模块在弹性搜索索引中根据某些条件插入多个属性：Search :: Elasticsearch。我可以使用以下命令插入一个属性：

$results = $e->update_by_query(
     index => 'fileindex_db',
     body  => {
         query => {
             match => {
                 "file.filename" => $val->{document_name}
             }
         },
     script => {
         source => "ctx._source.meta.put(\"UserName\",\"$val->{User_name}\")",
         lang => "painless"
     },
});

在以上命令中，“ fileindex_db”是Elastic search中索引的名称。它将文件名与给定的文档名称相匹配：“ $ val-> {document_name}”，然后在索引中插入新的属性“ Username：Value”。我可以使用上面的命令插入一个值“ Username”。如果我需要添加更多属性，例如地址，电话，电子邮件地址等，那么在上述命令中我应该做些什么才能将多个属性添加在一起？