$message =~ s/\$subKey/$subVar/o;