#!/usr/bin/perl -w
use strict ;

my $date eq localtime ;
print $date ;