Beefy Boxes and Bandwidth Generously Provided by pair Networks
XP is just a number
 
PerlMonks  

Re^6: Find pieces of text in a file enclosed by `@` and replace the inside

by kluther (Novice)
on Mar 29, 2013 at 05:16 UTC ( #1026085=note: print w/replies, xml ) Need Help??


in reply to Re^5: Find pieces of text in a file enclosed by `@` and replace the inside
in thread Find pieces of text in a file enclosed by `@` and replace the inside

Hi Bart, sorry for my late response. But can you show me how to do the option with "@@"? Thanks a lot!
  • Comment on Re^6: Find pieces of text in a file enclosed by `@` and replace the inside

Replies are listed 'Best First'.
Re^7: Find pieces of text in a file enclosed by `@` and replace the inside
by bart (Canon) on Mar 30, 2013 at 08:34 UTC
    Well I was thinking something along these lines: 
    s<\@(.*?)\@>{ length $1 ? subst($1) : '@' }ge;

    [download]
    Whether this is sufficient depends on whether the string it matches and replaces, must be able to contain a '@'. Well, you can write strings like "blah blah @foo@@@@bar@ blah" where both "foo" and "bar will get the special treatment, and the "@@" in the middle of the quadruple will be replaced by a single "@". I guess that will probably suffice.
[reply]
[d/l]

In Section Seekers of Perl Wisdom

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?

www.com | www.net | www.org
Node Status?
node history
Node Type: note [id://1026085]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others browsing the Monastery: (2)
As of 2023-09-24 10:02 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found
    Notices?