The text matched (if any) is replaced by replacement.
The text matched (if any) is replaced by replacement
For word boundary use \b
For global replacement use \g modifier
$a = 'Jeff Friedl';
$b = 'Jeffrey Friedl';
$c = 'Jeff is Jeff Friedl';
$a =~ s/Jeff/Jeffrey/;
$b =~ s/\bJeff\b/Jeffrey/;
$c =~ s/\bJeff\b/Jeffrey/g;
print $a; # Jeffrey Friedlprint $b; # Jeffrey Friedl (not Jeffreyrey Friedl)print $c; # Jeffrey is Jeffrey Friedl
We want to remove digits from stock proces.
Remove digits from stock proces, so
12.37500000392 is reduce to 12.375, yet
37.500 is reduced to 37.50
Shorthand \d matches a digit,
Removes a third posible zero (if any) with [1-9]?
Wrap in parantheses to capture to $1
$a = '12.37500000392';
$b = '37.500';
$a =~ s/(\d+.\d\d[1-9]?)\d*/$1/;
$b =~ s/(\d+.\d\d[1-9]?)\d*/$1/;
print $a; # 12.375print $b; # 37.50