$date =~ s/\:/\-/g;