$mon = "MON.DOC";

$date = system ("date \'+%m%d%Y\'");