my $num_substitutions = $var =~ s/foo/bar/g;

##</code><code>##

       s/PATTERN/REPLACEMENT/egimosx
               Searches a string for a pattern, and if found, replaces that
               pattern with the replacement text and returns the number of
               substitutions made.  Otherwise it returns false (specifically,
               the empty string).