6 Einträge, 1 Seite |
<xref xrefid="f002" xidtype="figure">
</xref>
1
2
3
4
5
6
7
8
9
10
use TagReader;
$xende ="</xref>";
my $p=new TagReader "testfile.sgm";
my @tag;
while(@tag = $p->getbytoken(1)){
if ($tag[0]=~/xref/i)
{
my $mod_xtag = $tag[0].$xende;
print $mod_xtag;
} }
6 Einträge, 1 Seite |