$string =~ s/$token/$date/;