CODEWITHSUNDEEP
regexperl
john
john

Reputation: 2662

perl regex, replace each individual words with another one

I have a formulat like

(var1  - var2 ) + var3

I want to replace var1 - var 3 with

(put(var1,format.) - put(var2, format.) + put(var3, format.)

what is the simplest way to do that with perl reg?

thanks.

Upvotes: 1

Views: 118

Answers (2)

Mukesh Bhoj
Mukesh Bhoj

Reputation: 21

my $string = '(var1 - var2 ) + var3';
$string  =~ s/(var\d+)/put($1, format.)/g;
print $string;

Upvotes: 0

aartist
aartist

Reputation: 3236

$string = '(var1 - var2 ) + var3';
$string  =~ s/\b(var\d+)\b/put($1, format.)/g;
print $string;

Upvotes: 3

Related Questions