use POSIX;
$date = POSIX::strftime("%A, %B %e, %Y at %T", localtime);