perl -e "$date=localtime(time); print $date;"