$var =~ s/foo/bar/ if (defined $var);