nahrazovani s Regularnimi vyrazy

[Jakub Zlamal]

Dobry den,
  umim zjistit jestli se v retezci vyskytuje regukarni vyraz, ale neumim RV
pouzivat v zamenovani a ve funkci index. Konkretne mi jde o toto:
  $line="<:25,2Times Roman15,0>Text<:11,5Symbol8,9>W<:12,3Times Roman18,3>"
potreboval bych v $line najit text mezi /<:.*Symbol.*>/ a /<:/ a zamenit za:
                                                  @@text@@
tedy potreboval bych to W obalit @@W@@
pritom to <:11,5Symbol8,9> by v $line melo zustat.

Je to mozne nejak elegantne udelat?

Jde pouzit RV ve funkci index? tedy napr index($line,/<:.*Symbol.*>/)
Me to vraci vzdy nulu. (pouzivam Perl pod Win32)

Dekuji za odpovedi
                                    Jakub Zlamal