$str =~ s/%var%/REPLACED/;