use POSIX 'strftime';
$ash_{date} = strftime $d_format[0], localtime;