Inline regex replacement in perl -


is there way replace text regex inline, rather taking text variable , storing in variable?

i'm perl beginner. find myself writing

my $foo = $bar; $foo =~ s/regex/replacement/; dostuff($foo) 

where i'd write

dostuff($bar->replace(s/regex/replacement/)); 

or like, rather using temporary variable , 3 lines.

is there way this? when regex sufficiently complicated makes sense split out can better explained, when it's s/\s//g feels wrong clutter code additional variables.

starting perl 5.14 can use non-destructive substitution achieve desired behavior.

use /r modifier so:

dostuff($bar=~s/regex/replacement/r); 

Comments

Popular posts from this blog

c++ - How do I get a multi line tooltip in MFC -

asp.net - In javascript how to find the height and width -

c# - DataTable to EnumerableRowCollection -