如何在Perl中的路径上计算SVG文本的位置？

Question

我想从SVG图形中提取文本，我需要以正确的顺序（从左到右）获取文本。我使用XPath表达式查找所有text个节点，然后使用Image::SVG::Transform来计算文本的实际位置。这适用于常规文本和旋转文本。

现在我在路径上有文字，我找不到Perl模块来为我做计算。考虑到我对SVG内部结构没有任何线索，我宁愿不自己做。

我可以使用什么Perl模块来计算路径上文本的起始位置？

示例：

<g id="g3426" transform="rotate(180,320.57846,970.1288)">
  <ellipse ry="38.88921" rx="34.891293" cy="1007.3622" cx="373.91425" id="path3887-6"/>
  <text>
     <textPath xlink:href="#path3887-6">
       <tspan dx="71.785721 0 0 -3.5714285">Text on ellipse</tspan>
     </textPath>
  </text>
</g>