Perl Use s replace and return new string

Question

In Perl  the operator s  is used to replace parts of a string  Now s  will alter its parameter  the string  in place  I would however like to replace parts of a string befor printing it  as in  print  bla     replace  a   b   myvar    n     Is there such replace function in Perl  or some other way to do it  s  will not work directly in this case  and I d like to avoid using a helper variable  Is there some way to do this in-line

User · Answer

If you have Perl 5 14 or greater  you can use the  r option with the substitution operator to perform non-destructive substitution   print  bla      myvar    s a b r    n     In earlier versions you can achieve the same using a do   block with a temporary lexical variable  e g    print  bla     do    my  tmp    myvar     s a b    tmp      n

User · Answer

require 5 013002    or better     use Syntax  Construct qw  r   print  bla      myvar    s a b r    n     See perl5132delta      The substitution operator now supports a  r option that copies the input variable  carries out the substitution on the copy and returns the result  The original remains unmodified    my  old    cat   my  new    old    s cat dog r     old is  cat  and  new is  dog

User · Answer

If you wanted to make your own  for semantic reasons or otherwise   see below for an example  though s    should be all you need       usr bin perl -w      use strict           main           sub main            my  foo    blahblahblah                   print   foo      replace  lah   ar   foo      n      foo  barbarbar                   sub replace         my   from  to  string               string   s  from  to ig                            case-insensitive global  all occurrences         return  string

User · Answer

print  bla      myvar    tr a  b    n

User · Answer

print  bla           n  if        myvar     s a b g or 1

[regex] Perl: Use s/ (replace) and return new string

Examples related to regex

Examples related to perl

Examples related to replace