Beefy Boxes and Bandwidth Generously Provided by pair Networks
Welcome to the Monastery

Re^3: Regular expression "replace string interpolation" problem

by ikegami (Pope)
on May 16, 2008 at 22:39 UTC ( #687041=note: print w/replies, xml ) Need Help??

in reply to Re^2: Regular expression "replace string interpolation" problem
in thread Regular expression "replace string interpolation" problem

Or how to embed " in the output - but that's not a biggie right now.

You want to produce the code
"$1 \"Perl\""
my $replace = '"$1 \\"Perl\\""'; # Produces: "$1 \"Perl\"" s/$match/eval $replace/e

Technically, the slashes don't need to be doubled since single quotes are forgiving when it's unambiguous.

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://687041]
[shmem]: can't help you there since that song is not on my bench
[Lady_Aleena]: shmem, I need to look at MP3::Tag to see how to get the date from one song.
shmem sticks himself into the envelope. gn.(1<<3) all

How do I use this? | Other CB clients
Other Users?
Others perusing the Monastery: (5)
As of 2017-04-23 22:21 GMT
Find Nodes?
    Voting Booth?
    I'm a fool:

    Results (432 votes). Check out past polls.