@timearray = localtime(time);
print "$timearray[5]\n"