Re: Replace after match in regex (key value subsitution)

by JavaFan (Canon)

on Oct 23, 2008 at 09:53 UTC ( #718995=note: print w/replies, xml )

Need Help??

I'd write that as (untested):

$$text_ref =~ s{"http://\K([^/"]*)(?=["/]){$main::fixers{$1} // $1}eg;
[download]

I assume non of the values of %main::fixers is undefined.

Comment on Re: Replace after match in regex (key value subsitution) Download Code

Domain Nodelet^?

Node Status^?

node history
Node Type: note [id://718995]
help

Chatterbox^?

How do I use this? | Other CB clients

Other Users^?

Others having an uproarious good time at the Monastery: (5)

As of 2023-02-02 15:11 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Voting Booth^?

I prefer not to run the latest version of Perl because:

Notices^?