allan wrote:
> hi
>
> how can i output:
> <dcv id=1>append here
> <dcv id=2>append here
> <dcv id=3>append here
>
> instead of just:
> <dcv id=1>append here
> <dcv id=2>append here
> <dcv id=3>
>
> thanks
> allan
> #!/usr/bin/perl -w
> $str = "<dcv id=1>some stuff <dcv id=2> more <dcv id=3> more stuff ";
> $_ = $str;
> $_ = join "append here\n", /<dcv[^>]+>/ig;
> print $_;
## append it once more ...
$str = "<dcv id=1>some stuff <dcv id=2> more <dcv id=3> more stuff ";
$_ = $str;
$_ = (join "append here\n", /<dcv[^>]+>/ig)."append here\n";
print $_;
## ... ... ??
=Detlef
