例如有这样一个句子:In the early morning hours, the ship sailed out of the habour.
经LOB/TOSCA tagger标注后如下:
<s>
<w ana='TLB-C-IN TLB-A-RP TLB-A-FW TLB-A-NC TLB-A-NN TLB-A-NNU'>
In
</w>
<w ana='TLB-C-ATI TLB-A-NC'>
the
</w>
<w ana='TLB-C-JJ TLB-A-RB'>
early
</w>
<w ana='TLB-C-NN TLB-A-NC'>
morning
</w>
<w ana='TLB-C-NNS'>
hours
</w>
<w ana='TLB-C-SCOM'>
,
</w>
<w ana='TLB-C-ATI TLB-A-NC'>
the
</w>
<w ana='TLB-C-NN TLB-A-VB'>
ship
</w>
<w ana='TLB-C-VBD TLB-A-VBN'>
sailed
</w>
<w ana='TLB-C-RP TLB-A-IN TLB-A-JJ TLB-A-JJB TLB-A-NC TLB-A-NN TLB-A-VB'>
out
</w>
<w ana='TLB-C-IN'>
of
</w>
<w ana='TLB-C-ATI TLB-A-NC'>
the
</w>
<w ana='TLB-C-NN TLB-A-VB'>
harbour
</w>
<w ana='TLB-C-SPER'>
.
</w>
</s>
请问Dr.Xiao如何使用perl script 转化为如下两种格式:
<s><w IN>In</w><w ATI>the</w><w JJ>early</w><w NN>morning</w><w NNS'>hours</w><SCOM'>,
</w><w ATI>the</w><w NN>ship</w><w VBD>sailed</w><w RP>out</w><w IN'>of</w><w
ATI>the</w><w NN>harbour</w><w SPER'>.</w></s>
<s>In_IN the_ATI early_JJ morning_NN hours_NNs,_SCOM'the_ATI ship_NN sailed_VBD out_RP
of_IN' the_ATI habour_NN._SPER'</s>
谢谢!